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sono veramente Leoni. 


Ecco come riconoscere un vero programma 
Leoni Informatica 



Quando per il tuo 
home computer il negoziante 
ti offre un programma a basso costo, dif¬ 
fidane. Nella quasi totalità dei casi si tratta di una 
copia duplicata che per di più può non girare bene. Le 
conseguenze, specialmente se si tratta della tua contabilità, sono 
facilmente immaginabili. Leoni Informatica, Azienda leader, fa programmi 
da sempre, e da sempre è sinonimo di altissima qualità. Riconoscere questi 
programmi è facile. La classica confezione bianca e blu è accuratamente si¬ 
gillata. AN’interno, allegate al floppy disk, vi sono le istruzioni in italiano e, cosa 
importantissima, la cartolina di garanzia. Inoltre Leoni Informatica è stata la 
prima in Italia ad offrire la garanzia a vita, l’assistenza ed il continuo aggiorna¬ 
mento dei suoi programmi; ed oggi, sempre all’avanguardia, produce i software 
MSX, compatibili con tutti i più importanti Personal Computer. 

Al tuo negoziante chiedi quindi la qualità, l’assistenza e l'aggiornamento: chie¬ 
di i programmi Leoni Informatica. 

Richiedi a Leoni Informatica l’elenco g uida ai suoi prog rammi. 


Leoni 



iniórmafica 


Leoni Informatica non ti abbandona mai 


Leoni informatica S.r.l. - Sviluppo Software 
Via Valsolda, 21 - 20143 Milano - Tel 02-8467378-8465072 


Potete trovare i nostri programmi in tutta Italia nei punti vendita Buffetti 
e dai rivenditori autorizzati che espongono il nostro marchio. 


BES Milano 
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Scrivete a LIST “La Posta dei Letto¬ 
ri’’ Casella Postale 4092 - 00182 
Roma Appio. Visto il crescente nu¬ 
mero delle lettere che ci pervengono 
giornalmente in redazione (e di que¬ 
sto ne siamo lieti), non ci è più possi¬ 
bile dare a tutti su ogni numero, una 
risposta. Siamo stati costretti, per li¬ 
miti di tempo e anche di spazio, a 
privilegiare i quesiti di interesse ge¬ 
nerale e comunque a rispettare i tur¬ 
ni. Non possiamo in nessun caso ri¬ 
spondere privatamente. 


UN INTERESSANTE 
CONTRIBUTO 


... Possiedo uno Spectravideo 
MSX 728 con drive da 5”, 1/4. 
Avendo notato che con il drive 
SsUi acceso la memoria scende a 
w* 22365 bytes e non a 24456 come 
specificato nell'articolo dell’egregio 
Fabrizio Russo, e che il programma, cosi 
come è stato stampato, non voleva 
assolutamente funzionare nelle procedure 
riguardanti il LOAD ed il SAVE. Allora mi 
sono permesso di modificare il 
programma nel modo seguente: 

1990 IF ERR-62 THEN K = 56063!: 

Q = 12341: RÉSUMÉ 100. 

Questa modifica è stata scelta “a 
occhio’’. Inoltre, poiché la Spectravideo 
ha la capacità di simulare altri drive, tra 
cui il C, che permette di leggere i 
dischetti scritti daN’Osborne 1, è stato 
necessario modificare l’errore forzato 
della linea 90 in LOAD’Z: ... 

Con il precedente LOAD’C: ... l’errore 
risultante era 53 invece del 62 desiderato. 
Mia moglie ed io stiamo lavorando su una 
modifica del programma che consente, 
lavorando sul video di 40 colonne, di 
stampare con, ad esempio, 60 colonne 
senza eventuali tagli di parole 
indesiderati. Come vede, adesso il DATA 
WRITER funziona anche sul mio 
computer. Spero di aver contribuito a 
fornire qualcosa di utile agli altri lettori... 

Edoardo Fleshcer 
Monte S. Pietro (BO) 


LO SHARP MZ 800 
DIMENTICATO 



Sono in possesso di uno Sharp 
MZ 800, ottimo computer. La serie 
800 ha coperto tutte le lacune del 
modello MZ 700 (es. grafica e 
suono), è costruito con standard 
di ottima qualità, consente notevoli 
possibilità che possono essere 
paragonate al C128 Commodore, ma 
sembra purtroppo che in Italia esistano 
solo i soliti Commodore e Sinclair. 
Ringrazio il sig. Enrico Fabrizi che tratta i 
programmi per l’MZ 700 e gli sarei molto 
grato se potesse trattare anche quelli per 
l’MZ 800, nonché pubblicare nella rubrica 
“hardware Review” una descrizione 
dettagliata di questo computer. 

Una curiosità: come mai questo computer 
uscito circa un anno fa, è stato ignorato 
da quasi tutte le riviste tecniche? 

Dove poso trovare programmi per l’MZ 
800 e in quale parte della rivista potreste 
pubblicare le novità soft della Sharp così 
pure di altre marche. 

Aldo Tosolini 
Udine 


Condividiamo l’opinione del lettore per ciò che 
concerne lo Sharp MZ 800, anche se la 
polemica contro i soliti Commodore e Sinclair 
ormai ci sembra stia diventando piuttosto 
sterile. Non sappiamo spiegare il perché il 
computer sia stato ingorato dalla maggior 
parte delle riviste, in ogni caso abbiamo fatto 
richiesta alla ditta distributrice in Italia, la 
MELCHIONI COMPUTERTIME (alla quale ci si 
può rivolgere anche per sapere dove reperire 
materiale informativo e/o software) di inviarci 
in visione un campione del computer per 
poterlo recensire. Se nel frattempo il computer 
non sarà uscito di produzione e soprattutto se 
lo spazio a disposizione sulle pagine della 
rivista lo permetterà, sicuramente vedrete 
pubblicata una dettagliata descrizione della 
macchina e delle sue caratteristiche tecniche. 


MSX-HELP ME! 


Sicuramente il lettore ha fornito con la sua 
lettera delle utili informazioni a quanti in 
possesso di un drive diverso dal solito formato 
di 3”,5 abitualmente usato per lo standard 
MSX, hanno avuto difficoltà nel l’usare il 
programma pubblicato qualche tempo 
addietro sulle pagine della nostra rivista. 

Inoltre, con questa lettera si comprende cerne 
possedendo l’hardware adatto, sia possibile 
riversare, attraverso più drive, Il contenuto di 
dischetti da 5 pollici, e quindi anche 
compilatori per lo Z80, oppure files di dati 
scritti da un PC IBM, preferibilmente 
compatibili con l'MSX DOS. 



Sono possessore di un PHILIPS 
VG 8020 MSX, da due mesi circa. 
Ho comperato subito la vostra 
rivista in quanto dopo una “mia” 
indagine è risultata essere ad un 
livello notevolmente superiore a quelle in 
circolazione, ma veniamo al problema. In 
LIST del mese di Dicembre ’85, è stato 
pubblicato un listato di videogame sul 
tennis. Dopo averlo pazientemente 
digitato, dato il comando RUN appare una 
parte dello schermo e la scritta “illegai 
function cali” in 280. Ho richiamato la 
linea ed è scritta come nel listato, l’ho 
riscritta, ma il risultato è il medesimo. 



È il computer che non va? 

C’è un errore di stampa? 

C’è qualche altra causa? 

In LIST di Gennaio/Febbraio ’86 non ho 
trovato notizia di una eventuale errata 
corrige; vorrei sapere come stanno le 
cose ed allego una fotocopia della linea in 
oggetto. 

Colgo l’occasione per salutare la 
redazione e spero ancora di veder 
pubblicati dei listati per MSX. 

Carlo Maltinti 
Montelupo F.no (FI) 

Ringraziamo il lettore per i numerosi 
complimenti espressi nella lettera (speriamo di 
non farci l'abitudine) e passiamo a risolvere il 
terribile problema che ha assillato ed assilla 
non solo il lettore di Montelupo F.no, ma molti 
altri. 

La linea non è stata riscritta come è stata 
pubblicata sulla rivista. Non c'è nessun errore 
di stampa, tantomeno è il computer che non 
funziona bene, si tratta in realtà di un banale 
errore di trascrizione che si manifesta quando 
si incontra la stringa successiva all’istruzione 
PLAY. Molti lettori confondono la lettera elle 
minuscola, successiva al 2, con la cifra uno. 
L’esatta trascrizione della stringa è: 

...PLAY “v12l (elle minuscola)16o6c”:... 

Ecco svelata la causa dell’arcano mistero. Il 
sig. Maltinti, come tutti i lettori che hanno 
scritto chiedendoci di veder pubblicati altri 
programmi per MSX, avrà avuto modo, se ha 
comperato anche gli altri numeri della rivista, 
di notare che sono stati pubblicati altri 
programmi per MSX, di cui alcuni molto 
interessanti. 


LE ISTRUZIONI SEGRETE 
MZ 700 


Sono possessore di uno Sharp MZ 
700, e sono molto deluso delle 
scarsissime qualità grafiche. 
Appena ho sentito parlare della 
scheda grafica di espansione, mi 
sono informato ulteriormente presso la 
ditta che la produce. Così ho scoperto 
che esiste anche uno slot d’espansione a 
due o tre uscite, usato normalmente per 
la scheda grafica e per il quick disk. 

Vorrei sottoporvi alcune domande: 

— il quick disk come gestisce i files? 

— ha una sua directory? 

— l’accesso è casuale o sequenziale? 

In pratica mi interessa sapere se il quick 
disk ha le stesse qualità di un disk drive. 
Utilizzando un programma (in allegato), 
sono riuscito a stampare tutte le parole 
riservate al BASIC. 

In tale elenco ho notato delle istruzioni 
che non sono state dichiarate nel 
manuale. Tra queste le seguenti: 

ERASE, KILL, AND, OR, EOF, STRINGS 
Esse originano un Sintax Error, mentre 
funzionano le seguenti: 

CLS - pulisce il video; 

TRON - inizia l’esecuzione stampando tutti 
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i numeri di linea eseguiti; 

TROFF - disabilita la funzione precedente; 
x - contiene il valore 3,1415927 (PI greco); 
JOY - visualizza il valore dipendente dalla 
posizione assunta dal joystick; 

HEX$ - visualizza il valore esadecimale 
che corrisponde al valore decimale 
dell’argomento. 

Non sono riuscito a capire come 
funzionano le istruzioni OUT# e INP#. 
Sarei felice di avere ulteriori informazioni 
sul come usare queste istruzioni... 

Mauro Ercoli 
Anghiari (AR) 
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Avevamo dato notizia nei numero 1/2-1986 
della produzione da parte delia REMA T 
Elettronica dello slot di espansione per lo 
Sharp MZ 700. 

Per ciò che riguarda il quick disk, non lo si 
può paragonare ad un disk drive, ma è 
sicuramente molto più versatile e veloce del 
registratore a cassette normalmente utilizzato 
sullo Sharp. Gran parte delle caratteristiche 
del quick disk dipende in larga misura dal 
software di gestione a corredo, dal modello, 
dal tipo e dalla marca del quick disk stesso. 
Riguardo alle istruzioni non dichiarate che non 
si è riusciti ad utilizzare e che generano un 
Syntax Error, ce ne sono alcune che 
sicuramente sono state adoperate male, ad 
esempio gli operatori logici AND e OR. Il 
lettore di Anghiari potrebbe provare ad 
utilizzarli in unione all’istruzione 
IF...THEN...come nell’esempio seguente: 

IF A = 1 OR A=2 THEN... oppure IF A = 1 
AND B= 1 THEN... 

Le istruzioni ERASE, KILL, EOF dovrebbero 
provvedere a svolgere le funzioni legate 
all’uso del disk drive, in particolare la 


10 Din A*C1323 ;CLS iPRINT"ATTENDERE.... LE 
GGO LE ISTRU2I0NI BASIC" 

20 1=1093? 

30 U=PEEKm 

40 IFCU= 1 281 + CU= 1 273 + CU=0D + C0=2551 THEN 
80 

50 IF U>.128 THEN 1 10 
60 C*=CHR*CU3 
70 R$=R$+C$ 

80 1=1+1 

90 IF T>12614THEN 150 
100 GOTO 30 
110 J=J+1 
120 U=U-1 28 

1 30 C*=CHR$CU'J :R*=R*'+C4 :A*C J 5=RS :(?*=•’ " 
140 GOTO 80 

150 PRINT"VOCABOLARIO S-BASIC":PRINT ; PRI 
NT 

160 FPR J = 1 TO 130 - PRINT A*CJ I, :IHEXTJ 
i?0 PRINT SPRINT ; PRINT"RIORDINO ALFABETIC 
AMENTE" 

180 F=129 

190 FOR J=1 TO F 

200 IF A*C-J+13>A*CJ3 THEN 250 

210 D=1 

220 Bt=A4CJ1 

230 A*CJ3=A*CJ + 13 

240 A*CJ+13=B* 

250 NEXTJ 

260 IF 0=0 THEN 300 
270 D=0 

280 F=F-1 :CURS0R32,23 [isTUSING 1 ’###" ;F 
290 IF F>2 THEN 190 
300 CLS 

310 PRINT ; PRINT SPRINT :PRINT"VOCABOLARIO 
S-BASIC" --PRINT :PRINT 
320 FORJ = 1 TO 130 STEP 4 
330 PRINT/P TCBC03 A*CJ I ; 

340 PRINT/P TABI 103ASCJ+13 ; 

350 PRINT/P TABC203A4CJ+23 ; 

360 PRINT/P T AB C 30 3 A* C -J + 3 3 
370 NEXTJ 
380 END 


cancellazione di files da disco, e l’indicazione 
della fine dei files sul dischetto. 

Anche le istruzioni UOTE e INPE possono 
essere associate all'uso del disk drive, oppure 
possono indicare, associate ad un parametro, 
la condizione di una qualsiasi unità periferica 
collegata al computer. 


VG 8010 E PROGRAMMI 
MSX 


...Da quando posseggo un Philips 
VG 8010 seguo fedelmente la 

H I vostra rivista che apprezzo per la 
! completezza e la professionalità. 

J Vi sottopongo alcuni problemi in 
cui sono incorso digitando i programmi da 
voi pubblicati. 

— TENNIS: dopo averlo battuto e 
controllato più volte, ho dovuto eliminare 
la linea 550, altrimenti tutto lo schermo si 
colorava di rosso; nell’esecuzione, le 
figure dei giocatori risultano incomplete 
ed il gioco si svolge senza possibilità di 
intervento attraverso i comandi' 
predisposti. 

— ROAD RACE: interruzione con 


segnalazione di “Out of Data’’ in 450. 
Anche questo programma è stato 
controllato più volte per quanto riguarda 
la digitazione. Inoltre il listato in mio 
possesso presenta la linea 170 poco 
leggibile, ed è assente la linea 160. 

— PAINT WITH DRAW: questo programma 
funziona perfettamente. A mio avviso, 
però, sarebbe più agevole da usare se lo 
sprite a forma di croce rimanesse visibile 
anche usando l’opzione FREE. È 
possibile? 

Rimango in attesa... 

Antonio Di Spirito 
Fondi (LT) 


Innanzitutto preghiamo tutti i nostri lettori di 
evitare di allegare francobolli per la risposta 
privata; per motivi redazionali non possiamo 
rispondere a tutti, e sulle pagine di questa 
rubrica rispondiamo ai quesiti di interesse 
comune. 

Detto questo, passiamo a spiegare al lettore 
di Fondi quali potrebbero essere ie probabili 
cause dei problemi lamentati nei programmi 
indicati. 

Per il TENNIS sicuramente si tratta di un 
errore di trascrizione avvenuto alle linee 
comprese tra 530 e 550 per il “riempimento" 
dello schermo del colore rosso. 

Per ciò che riguarda la mancata 
visualizzazione dei giocatori ed il mancato 
controllo dei movimenti, bisogna fare 
attenzione a digitare correttamente tutte le 
Istruzioni DATA corrispondenti alle varie parti 
dei giocatori ed alle linee 280 e successive 
per l'esatta determinazione del tipo di 
comando da utilizzare. In particolare la 
variabile JO (copie ampiamente scritto nelle 
ndicazioni concernenti le variabili) indica il 
’ipo di comando utilizzato e cioè da 0 a 2 
nspettivamente tastiera, joystick 1 e joystick 2. 
Inoltre, una importante funzione è determinata 
dalle linee 1300 e successive che 
provvedono, interpretando il conténuto della 
variabile JO, a determinare i salti alle varie 
routines di movimento. 

ROAD RACE è stato evidentemente digitato in 
maniera non proprio corretta tra le linee 560 e 
670, evidentemente è stato omesso qualche 
valore compreso in queste linee. 

La linea 160 effettivamente non esiste sul 
programma, quindi non c’è da 
preoccuparsene. La linea successiva è invece 
la seguente: 

170 FOR T=0 to 23: LOCATE O, T 
Infine per il programma PAINT WITH DRAW 
basta sostituire i valori del blocco di data 
corrispondenti al carattere visualizzato nelle 
linee tra 630 e 650. Se si desidera il carattere 
croce per entrambe le condizioni è sufficiente 
ripetere gli stessi data anche alla linea 650, se 
viceversa si desidera il contrario è sufficiente 
operare in maniera inversa. 

Teniamo a rammentare a tutti i lettori 
possessori del PHILIPS VG 8010, spesso 
afflitti dal dubbio della compatibilità dei nostri 
programmi con la loro macchina, che tutti i 
programmi fin qui pubblicati sono stati provati 
anche su tale modello presente 
temporaneamente in redazione, senza che si 
sia verificato alcun Inconveniente, quindi... 
Buon Lavoro! 
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LA COPIA 
“STROPICCIATA” 


...Nel novembre del 1985 ricevetti a 
scuola, Liceo Scientifico “G. 

; I -j0 ! Veronese” Chioggia, nel quale 
titillili; insegno Matematica e Fisica, 
w l’invito ad abbonarmi alla vostra 
pubblicazione mensile. Credendo nella 
validità didattica dell’iniziativa, prima di 
consigliarla ai miei allievi feci 
personalmente l’abbonamento, pagando L. 
38.500. 

Ora, purtroppo, debbo ricredermi sulla 
serietà della vostra organizzazione. Dal 
23/11/85, giorno in cui feci 
l’abbonamento, ho ricevuto una sola 
copia della rivista datata: ANNO III/ N. 12/ 
Dicembre 1985 trovata per terra bagnata e 
stropicciata e priva della dispensa, al 
rientro delle ferie natalizie. 

Non ho ricevuto altre copie, per cui non 
mi è stato possibile utilizzare la 
pubblicazione a livello scolastico. 
Sinceramente infastidito della cosa vi 
prego di restituirmi la quota che ho 
versato, trattenendo la somma di lire 5000 
del numero in mio possesso. Vorrei far 
notare che, abbonato ad altre riviste, non 
ho mai avuto problemi postali. 

Distinti saluti. 

Giacinto Pesce 
Sottomarina (VE) 

C’è sempre una prima volta, egregio Prof. 
Pesce. 

Siamo contenti del fatto che Lei abbia creduto 



nella validità didattica della nostra iniziativa e 
ci duole notevolmente sapere che sia rimasto 
così profondamente “infastidito”. 

Purtroppo siamo costretti, nostro malgrado e 
con altrettanto fastidio, a ricordarLe che 
ancora non siamo riusciti ad organizzare con i 
nostri collaboratori attuali, un servìzio di 
consegna a domicilio “door to door” per i 
nostri abbonati, magari per l’ora della 
colazione insieme ad un cappuccino ed alla 
fatìdica “brioche”. 

Per la distribuzione delle riviste agli abbonati, 
ci affidiamo al servizio di spedizione in 
abbonamento postale, e le riviste da noi 
consegnate agli uffici di spedizione sono 
precedentemente confezionate in redazione 
con la massima cura. Non è certo colpa 
nostra se qualcuno ha pensato bene di aprire 
la confezione, staccare la dispensa dal l’interno 
della rivista (per suo uso personale), e buttarla 
poi a terra, magari in una pozzanghera. 

Se i fatti sono questi, e nessuno ci vieta di 
pensare che si tratti dì una supposizione molto 
vicina alla realtà, il Prof. Pesce non ci può 
accusare di scarsa serietà; la colpa non è 
certo nostra. Riguardo al mancato ricevimento 
dei numeri successivi, il primo numero del 
1986 è in realtà un numero doppio (Gennaio/ 
Febbraio), entrato in distribuzione nelle 
edicole, in contemporanea con la spedizione 
degli abbonamenti, in data 5 Febbraio 1986. 
La sua lettera è datata 18 Febbraio, motivo 
per il quale siamo giustamente costretti a 
pensare che, conoscendo gli abituali tempi 
delle poste italiane, si tratta di un normale 


ritardo non imputabile alla nostra 
organizzazione. Riguardo alla restituzione della 
somma inviata, ci dispiace doverLe 
comunicare che per ragioni amministrative, 
non ci è possibile accontentarLa. 


TRE DOMANDE PER IL C 16 


Da pochi mesi sono in possesso 
/ 2 'Jg : di un Commodore 16 e volendo 

rnetter, ° al lavoro ho scoperto che 
i listati per videogames e utility 
sono pochi. 

Potete dirmi se sono in commercio libri 
contenenti questo tipo di programmi per il 
mio computer? 

Esistono home computer (a parte il Plus 
4) che adottano lo stesso linguaggio del 
Commodore 16? 

Infine, come posso fare per conoscere il 
contenuto delle locazioni di memoria 
riguardanti la gestione del joystick? 
Complimenti per... 

Roberto Parco 
Bergamo 

Sappiamo di parecchi negozi che ormai 
distribuiscono prodotti Commodore adatti al 
C 16, comunque, per ulteriori informazioni la 
Commodore ha istituito un servizio telefonico 
di assistenza per i propri utenti, al quale ci si 
può rivolgere per ogni informazione. 

Il numero telefonico è: 02/61832245, dalle ore 
14 alle ore 18. 

Non esistono, se si esclude il Plus 4, altri 





A TUTTI I LETTORI DI 
BUONA VOLONTÀ 


Prossimamente LIST darà il via ad una simpatica e stimo¬ 
lante iniziativa: “La Posta Concorso”, uno spazio dedicato a 
tutti voi Lettori che vorrete scriverci proponendo un pro¬ 
gramma particolare, una soluzione geniale, una realizzazio¬ 
ne molto personale o qualsiasi idea luminosa vi venga in 
mente. Le migliori proposte (ad insindacabile giudizio della 
redazione) verranno pubblicate e la migliore di ogni mese 
verrà anche premiata con un regalo, sempre diverso, che 
sarà annunciato su ogni numero precedente la pubblicazione 
della lettera premiata. 

A questo punto non vi resta che “aguzzare l’ingegno”, 
“spremervi le meningi” ed inviare al più presto le vostre 
proposte a: LIST “Posta Concorso” Casella Postale 4092 - 
00182 Roma Appio. Quanto prima vi diremo quale sarà il 
premio per il primo numero della Posta Concorso. A tutti 
buon lavoro. 
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LA BIBLIOTECA DI LIST... 

... UN’OCCASIONE DA NON PERDERE. 


Una serie di volumi indispensabili a coloro che vogliono saperne 
di più... e a prezzi particolari che LIST ha ottenuto per i suoi letto¬ 
ri. Questi volumi potete trovarli tutti nelle migliori librerie, ma se li 
ordinerete alla nostra Redazione, potrete averli con uno sconto 
del 10%. 

Approfittatene subito perché le copie a disposizione dei nostri let¬ 
tori sono in numero limitato. 


Per ricevere questi volumi con lo sconto, compila il modulo di 
c.c.p. alle pagg. 81/82 specificando il relativo codice. Li riceve¬ 
rai a stretto giro di posta comodamente a casa tua senza alcu¬ 
na spesa supplementare. 

In preparazione altri due volumi: Il manuale dell’MSX e II linguaggio 
Logo. Presto saranno disponibili con le stesse facilitazioni 



DATA BASE 

(106 pagg.) 
cod. LA 4 

Come organizzare, preparare e immettere 
i dati in un personal computer 
Prezzo: L. 8.100 invece di 
L. 9.000 


A-B-C COMPUTER 

(160 pagg. grande formato) 
cod. LS 1 

Per capire che cos’è e come si usa il 
Computer 

Prezzo: L. 22.500 invece di 
L. 25.000 


IL COMPUTER IN CASA 

(140 pagg.) 
cod. LA 7 

15 programmi per tutti i problemi di 
gestione domestica 
Prezzo: L. 10.800 invece di 
L. 12.000 




PROGRAMMI PER VIDEOGIOCHI 

(160 pagg.) 
cod. LA 5 

13 programmi per giocare, imparare a 
programmare e scrivere nuovi giochi 
Prezzo: L. 10.800 invece di 
L. 12.000 


APPLE II E APPLE Ile 

(140 pagg.) 
cod. LA 6 

Scoprite il vostro Apple II e Apple Ile: 
come si usa e cosa sa fare 
Prezzo: L. 10.800 invece di 
L. 12.000 


GRAFICA PER VIC 

(192 paga.) 
cod. LA 2 

Per entrare nel mondo affascinante dei 
disegni tridimensionali. • 

Prezzo: L. 12.600 invece di 
L. 14.000 



IL PRIMO BASIC 

(96 pagg.) 
cod. LA 3 

Le prime istruzioni e gli esempi che vi 
insegnano a programmare 
Prezzo: L. 7.200 invece di 
L. 8000 





GRAFICA PER COMMODORE 64 

(160 pagg. grande formato con cassetta) 
cod. LA 8 

Programmi per il disegno tecnico, 

P eometrico architettonico, d’animazione, 
'rezzo: L. 17.000 invece di 
L. 23.000 (compresa la cassetta) 


ALGEBRA PER IL BIENNO 

(184 pagg. grande formato con cassetta) 
cod. LA 9 

Il programma di matematica appreso con il 
computer: un insegnante chiaro e paziente. 
Prezzo: L. 18.000 invece di 
L. 20.000 (compresa la cassetta) 
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computers compatibili con il C 16; ci possono 
essere computers con un BASIC 
sostanzialmente poco dissimile, ma non 
completamente identico. 

Se si consulta il manuale italiano in dotazione 
al computer, esattamente a pagina 118, si 
avrà modo di leggere che esiste una specifica 
istruzione — JOY (n) — che permette di 
conoscere lo stato dei joystick (n). Se si 
collega il joystick in porta uno ed adoperando 
il seguente programmino, dato il RUN, sullo 
schermo saranno visualizzati i valori 
corrispondenti alle condizioni d’uso del 
joystick: 

10 PRINT JOY (1): GOTO 10. 

Per conoscere i valori corrispondenti al 
joystick collegato in porta due, sarà sufficiente 
variare il parametro corrispondente alla 
istruzione JOY con 2, cioè JOY (2). 


THE WALL... SHARP 
MZ 700 


* pii ...Nel numero 1/2 (Gennaio/ 

/ V, Febbraio 86) è stato pubblicato un 
programma per lo Sharp MZ 700, 

' J intitolato “Il Muro”, nel quale alla 
linea 50 c’è una riga che 
sottolinea la sequenza di numeri usata 
come routine. Il mio problema è che non 
riesco a trovare nel codice ASCII il testo 
corrispondente al codice indicato. Qual’è 
il testo? 

Esistono pubblicazioni riguardanti lo 
Sharp MZ 700? 

Roberto Valeri Bressan 
Roma 


Siamo alle solite... 

Quando credevamo che i problemi riguardanti 
l’esatta interpretazione dei codici grafici dello 
Sharp MZ 700, fossero stati definitivamente 
risolti, ci ritroviamo invece a combattere con i 
medesimi quesiti. 

I codici sono chiaramente indicati nella tabella 
di pag. 156 del manuale Sharp. La linea 50 
contiene tre codici, ed esattamente il codice 
FC corrispondente al carattere in basso a 
sinistra del tasto con la parentesi graffa e 
quadra chiuse (subito vicino al tasto CR); il 
codice CB corrisponde al carattere pieno 
individuabile in basso a destra del tasto (F); 
l’ultimo codice, E E corrisponde al carattere in 
basso a sinistra sul tasto della Z. 

Per le pubblicazioni riguardanti lo Sharp MZ 
700, consigliamo di rivolgersi all’importante 
esclusivista MELCHIONI COMPUTERTIME. 


QUESITI, QUESITI, QUES ITI 

Posseggo un Commodore 64 e 
vorrei ricevere alcune 
informazioni. 

— Quanti K RAM ha il Commodore 
128? 

— Come si sottolineano i caratteri? quale 
importanza ha sui programmi? 



— Programmando in linguaggio macchina, 
si risparmia memoria? 

— PROM ed EPROM sono programmabili 
direttamente con il solo computer? dove 
sono reperibili? 

— Qual’è la grandezza media di una 
stampante a margherita? 

Raffaele Cirillo 
Treca se (NA) 

Il C 128 offre 128 K RAM espandibili con 
l'aggiunta di espansioni esterne fino a 512 K. 

I caratteri sottolineati sui programmi da noi 
pubblicati, specialmente per ciò che riguarda 
lo Sharp MZ 700, indicano l’uso di tasti grafici 
non evidenziati dalla stampante, riguardo a 
come si sottolineano, noi usiamo 
semplicemente una riga ed un pennarello a 
punta fine...?! 

Programmando in linguaggio macchina, non 
necessariamente si guadagna “spazio” in 
memoria, dipende come al solito dalla 
lunghezza del programma, ma si guadagna 
notevolmente sulla velocità di esecuzione dei 
programmi. 

PROM ed EPROM sono programmabili 
mediante una scheda di interfaccia da 
applicare al computer; da ricordare che le 
PROM non sono cancellabili, al contrario delle 
EPROM che invece è possibile cancellare. In 
qualsiasi negozio adeguatamente fornito, è 
possibile “scovare” sia il programmatore che 
le EPROM. 

La grandezza media di una stampante a 
margherita,è in funzione del formato della 
carta usata. Utilizzando un modulo a 132 
colonne, indicativamente le dimensioni 
espresse in cm sono di 60 x 40 x 15. 


DIMENSIONAMENTO 


... Possiedo un Commodore da 
«ferrai quasi un anno. Nonostante sia in 
grado di realizzare qualche piccolo 
programma, ho dei “problemi” 
con | istruzione DIM. 

Potreste spiegarmi come utilizzare tale 
comando basic? 

Christian Fava 
Roma 

Con lo statement DIM (DIMensionamento) 
viene definita una serie di variabili detta 
ARRAY. 

Poniamo l’esempio di una classe di alunni. 
L’insegnamento saprà all'inizio dell'anno 
certamente il numero dei ragazzi — diciamo 
15 — e quindi, ancor prima di averli 
conosciuti, sarà in grado di preparare il 
registro in modo da dover inserire dopo averli 
incontrati i nomi degli studenti. 

Numerare il registro da la 15 prima di 
conoscere i nomi da dovervi inserire equivale 
all'eseguire il DIM. 

In pratica tale funzione BASIC serve a lasciare 
libera una certa parte di memoria, che verrà 
utilizzata in seguito. 

Riproponiamo l’esempio citato sotto forma di 
programma: 


10 DIM N$(15) 

20 FOR K = ITO 15:PRINT 
“STUDENTE”;K 
30 INPUT N$(K):NEXT 
40 PRINT“STUDENTE N.5 = ”;N$(5) 

L’istruzione DIM di linea 10 dice al computer 
di scansare una parte di memoria dove verrà 
inserita in seguito una serie di stringhe. 

Poiché il computer comincia a “contare’’ da 
zero, la memoria riservata sarà per sedici 
nomi. 

È possibile creare arrays complesse (a più 
dimensionamenti) nelle quali poter inserire più 
informazioni, indicando fra le parentesi più 
numeri separati da virgole, a seconda delle 
esigenze. 

Ad esempio l’istruzione 

DIM K$(15,3) 

crea una array bidimensionale da 64 elmntl — 
16 stringhe (0-15) x 4 (0-3) — dove poter 
inserire oltre al nome dei “nostri” quindici 
studenti anche altri dati. 

Non è possibile ridimensionare una array 
(REDIM'D ARRAY ERROR): una volta 
assegnate le dimensioni devono essere 
rispettate. 


KOALA PAD 


F JSM ... Mi piacerebbe utilizzare la mia 
ffig l tavoletta KOALA 

indipendentemente dalla creazione 
' di disegni (ad es. per la selezione 
v de || e 0 p Z j 0n j di un menù). 

Potreste darmi qualche suggerimento? 

Luigi Cabona 
Genova 

La tavoletta grafica “KOALA PAD" viene 
“letta” dal computer nello stesso modo in cui 
vengono identificate le paddles. 

Ogni paddle assume un valore da 0 a 255 a 
seconda della direzione, mentre la tavoletta 
indica al computer due numeri (0-255) 
corrispondenti alla posizione cartesiana della 
penna (orizzontale/verticale = X, Y). Per quel 
che riguarda il 64 tali coordinate si hanno 
con il peaking della locazione 54297 
(orizzontale) e 54298 (verticale), 
er determinare quale pulsante viene premuto 
utilizzare le seguenti linee di istruzioni: 

IF(PEEK(56321) AND 8 = 0 THEN destro 
IF(PEEK(56321) AND 4 = 0 THEN sinistro 

Il piccolo programma BASIC dato di seguito 
utiliza la tavoletta grafica per muovere uno 
sprite. Premendo i pulsanti... 

10 PRINT “I CLRj ”:FOR A = 832 TO 

896:POKE A,255:NEXT:POKE 

2040,13: POKE 53269,1 

20 POKE 53248,PEEK(54297):POKE 53249, 

PEEK(54298) 

30 IF(PEEK(56321) AND 8 = 0 THEN POKE 
53287,(PEEK (53287+ 1)*- 
(PEEK(53287)255) 

40 IF(PEEK(56321) AND 4 = 0 THEN POKE 
53277,-(PEEK (53277) = 0) 

50 GOTO 20 
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LIST N AG AZINE 


Tutte le notizie, i flash, le novità, le curiosità, le informazioni, i prodotti. 

IL COMPUTER LIBERA 
LA FANTASIA CON I SISTEMI GRAFIKA 



La GRAFIKA ha sviluppato 
dei sistemi CAD (Computer 
Aided Design/Drafting) che 
sono presentati in due 
configurazioni standar: CAD 
li e CAD III. Con i sistemi 
CAD è possibile risolvere con 
facilità qualsiasi problema di 
disegno e progettazione: 
tracciare schizzi, memorizzare 
disegni, creare liste, stampare 
computi, visualizzare sul 



CAD II è un pacchetto 
di oltre 100 procedure per 
archivi grafici a 2 dimensioni. ! 


monitor i disegni creati sulla 
tavoletta grafica ed ottenere il 
prodotto finale su carta 
disegnato automaticamente da 
un plotter. I campi di 
applicazione del disegno 
automatico possono essere 
suddivisi nelle seguenti 
categorie: 

— Disegno architettonico 
— Ingegneria civile 
— Impiantistica (termica, 
idraulica, elettrica, ecc.). 
— Schemi funzionali e 
Layouts 

— Disegno Meccanico 
— Cartografia 
— Disegno aeronavale 
— Circuiti stampati 
— Microcircuiti 
— Design industriali 
11 sistema è indirizzato verso 
un’utenza non specializzata 
(geometri, disegnatori, ' 
architetti, ingegneri, ecc.) con 
un training di preparazione di 
massimo 5 giorni. Le due 
configurazioni si distinguono 
per il software applicativo, 
ma sono basate sul medesimo 
hardware: Elaboratore 
elettronico TEXAS 
INSTRUMENTS con 
memoria centrale da 256 
KBytes ed ECC (Error 
Correction Circuit), terminale 
video con tastiera con 
! risoluzione di 1920 caratteri 


Il sistema Grafika 

(24*80), memoria di massa 
composta da unità a floppy 
disk (1.2 MBytes) o dischi 
rigidi da 10 MBytes a 300 
MBytes; postazione grafica 
interattiva con 512 MBytes 
RAM, controller per monitors 
B/N e colori, plotter, digitizer 
da 11”; unità di uscita 
plotter. 

Il software applicativo 
disponibile può essere 
riduttivamente descritto come 
un pacchetto di 100 procedure 
riguardanti problemi grafici 


bidimensionali (CAD II), e la 
descrizione di oggetti 
tridimensionali per 
l’elaborazione automatica di 
piante, prospetti, sezioni, 
prospettive, assorlometrie, 
ecc. (CAD III). Le procedure 
di assimilazione dati sono 
state realizzate in maniera da 
interagire con l’elaboratore 
evitando di usare le 
tradizionali proiezioni 
ortogonali. Anche se rivolti 
ad un pubblico di specialisti 
del disegno, i due pacchetti 
software rappresentano una 
soluzione di elevata qualità 
per ciò che concerne l’aspetto 
quantitativo della 
riproduzione grafica (velocità, 
manegevolezza, ecc.), sia per 
l’aspetto progettuale vero e 
proprio della produzione e 
manipolazione di oggetti, sia 
nel piano che nello spazio. 

GRAFIKA Sr. - Piazza 

Gondar, 22 - 00199 Roma - 

06/837345-837274 



CAD III per la manipolazione di oggetti nello spazio 
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SIRIO INFORMATICA AD EDP USA 


La Sigraph, del gruppo Sirio in¬ 
formatica, ha presentato in occa¬ 
sione dell’EDP USA una serie di 
novità software ed hardware per 
computer. 

Videoworf environment - Un ver¬ 
satile strumento per pubblicitari, 
tecnici video stilisti e designers. 
Permette di animare le immagini; 
mettendo in sequenza le singole 
pagine video è possibile compor¬ 
re automaticamente un filmato. 

È inoltre possibile muovere gli 
oggetti disegnati da una posizio¬ 
ne ad un’altra, mutarne le dimen¬ 
sioni, ruotarli sui 3 assi, identifi¬ 
carne il centro di rotazione, pro¬ 
durre effetti prospettici, variare i 
colori, aggiungere sfondi prece¬ 
dentemente creati. 

Palcood - Si tratta di un codifica¬ 
tore PAL che consente di trasfor¬ 
mare un segnale video a colori di 
natura analogica in standard 
RGB, in un segnale video compo¬ 
sito PAL. 

Palsync - Sincronizzatore di 
schede grafiche “Number Nine” 
e “Galaxi” con un segnale gene¬ 
rato da fonte esterna o da fonte 
interna all’apparecchio. 

Targa 16 - Prodotto dalla AT&T, 
si tratta di una scheda funzionan¬ 
te su PC IBM e compatibili, per 
acquisire e memorizzare immagi¬ 
ni in tempo reale, con alta risolu¬ 
zione (512 * 512 pixel) e 32768 
colori contemporanei. 

ADE 3 - La versione espansa di 
AUTOCAD per la costruzione di 
figure tridimensionali, visualizza¬ 
zione da punti di vista diversi, ri¬ 
mozione delle linee nascoste, di¬ 
segno polilineare, gestione CADI 


Camera, ecc. 

I prodotti applicativi per il nuovo 
AUTOCAD sono: 

CAD Parametrico - per il ricalcolo 
e nuova rappresentazione grafica 
di disegni o simboli già realizzati 
e memorizzati, in funzione di va¬ 
riabili scelte dell’utente; 

NC Programmer - per passare ra¬ 
pidamente dalla fase di progetta¬ 
zione a quella di produzione. Con 
tale prodotto è possibile genera¬ 
re, direttamente da un disegno 
eseguito con AUTOCAD, i codici 
necessari a guidare macchine a 
controllo numerico (standard EIA 
RS 274D) attraverso una comuni¬ 
cazione seriale asincrona; 

Autoslip - potente linguaggio di 
programmazione utilizzato in 
unione ad ADE 3 consente speci¬ 
fiche applicazioni di calcolo svi¬ 
luppate dall’utente. 

Tallgrass - Sistemi di memoria di¬ 
massa nastri di back-up per IBM 
PC e compatibili, hard-disk inter¬ 
ni e sottoinsiemi da 24 a 30 MB, 
software per Back-up automatico 
e nastri, sempre per back-up, in¬ 
terni e/o esterni con capacità da 
20 a 60 MB. 

Completa il panorama di novità- 
presentate, anche una worksta¬ 
tion CAD a 32 bit, basata sul Mi¬ 
cro VAX II Digital, di cui ora la 
Sigraph è centro di vendita, com¬ 
pleta di sistema RAMTEK per 
modellazione di solidi con elevate 
prestazioni. 

SIRIO INFORMATICA S.p.A. - 
V.le Certosa 148 - 20156 Mila¬ 
no - Tel.: 02/3010051 - 

DOTT.ssa Cristina Cazzaniga. 


ACCORDO COMMERCIALE DYNATECH 
COMMUNICATIONS EIPACRI 


È stata ufficializzata la stipula di 
un accordo commerciale fra la 
IPACRI, Istituto per l’automazio¬ 
ne delle Casse di Risparmio, e la 
Dynatech Communications, filiale 
italiana di una delle più importan¬ 
ti società di apparecchiature per 
l’interfacciamento ed il controllo 
delle prestazioni di reti di comuni¬ 
cazione. Le Casse di Risparmio 
italiane associate grazie ai termi¬ 
ni di questo accordo potranno 
usugruire dell’ampia gamma di 
prodotti Dynatech: sistemi di swi- 


tch automatico e manuale, siste¬ 
mi per la gestione di reti dati, 
strumenti di reti a commutazione 
di pacchetto X 25 e sistemi di 
controllo per elaboratori e reti di 
comunicazione dati. 


DYNATECH COMMUNICA¬ 
TIONS - Mattea Rossetti - 
Tel.: 02/650263 
BIT RELATIONS - Nazarena 
Olivetti - Tel.: 02/862749 


DATA GENERAL 
HA APERTO UN LABORATORIO 
DI SVILUPPO IN EUROPA 


Data General Corporation ha 
aperto a Cambridge (Inghilterra) 
un laboratorio di sviluppo che ini¬ 
zialmente si occuperà di fornire lo¬ 
calmente il supporto al software 
sviluppato per i sistemi Data Gene¬ 
ral da altre aziende, comunemente 
chiamate “terze parti”. 

11 laboratorio comincerà anche a 
sviluppare, per i sistemi Data Ge¬ 
neral prodotti software di comuni¬ 
cazione che saranno compatibili 
con gli attuali standard di comuni¬ 
cazione esistenti in Europa. 

In questo laboratorio opera attual¬ 


mente un piccolo gruppo di ricer¬ 
catori. Nei prossimi anni il labora¬ 
torio verrà gradualmente ampliato 
e potenziato in parallelo allo svi¬ 
luppo della Società. 


Data Generai S.p. a. 

— Roma, Via G. Armellini, 
10, Tel. (06) 59.14.644/ 
923 

— Cinisello Balsamo (MI), 

Via F.llì Gracchi, 36 - Tel. 
(02) 61.20.141 


UN PERSONAL COMPUTER IN PREMIO 
A CHI TROVA UN REGISTRATORE 
DI CASSA “NATIONAL” 


Un giorno sul finire del secolo 
scorso arrivò sul banco di un 
farmacista napoletano uno 
“strano arnese”: un registrato- 
re di cassa National, regalo di 
un lontano parente emigrato 
negli Stati Uniti. 

Si trattava, molto probabil¬ 
mente, del primo registratore 
di cassa che aveva attraversato 
l’oceano ed era giunto sul ban¬ 
co di un negoziante italiano. 
Da allora altri ne giunsero fino 
al 1905 quando la National 
Cash Register iniziò ufficial¬ 
mente la sua attività in Italia 
come Società Anonima Regi¬ 
stratori di Cassa National. 
Oggi NCR è un marchio uni- 



Chi fotografa il registratore 
di cassa più vecchio, vince il 
Persona! Computer più 
nuovo 


versalmente riconosciuto e al¬ 
l’avanguardia nella produzione 
di computer tecnologicamente 
avanzati ed altamente sofistica¬ 
ti e i vecchi registratori di cassa 
nichelati con i fregi in rilievo 
sono diventati pezzi da colle¬ 
zionisti, accanitamente ricerca¬ 
ti dagli appassionati, di cui 
molti esemplari si possono tro¬ 
vare anche in vecchie botteghe 
un po’ in tutta Italia. 

Per celebrare i suoi 80 anni di 
presenza sul territorio naziona¬ 
le, la NCR ha deciso di lancia¬ 
re una singolare “caccia al te¬ 
soro”: il concorso ‘Trova la 
Numero Uno’. 

Obiettivo del concorso è indivi¬ 
duare il più antico registratore 
di cassa National esistente in 
Italia. 

Chi lo trova deve fotografarlo, 
scrivere il numero di matricola 
e inviare il tutto alla NCR; una 
commissione esaminerà tutte le 
segnalazioni per individuare la 
‘Numero Uno’. 

Il fortunato scopritore riceverà 
in premio un personal Compu¬ 
ter con schermo a colori; un 
premio sotto forma di un altro 
Personal andrà anche al fortu¬ 
nato possessore del registrato- 
re. 

NCR Italia — dr. Luigi Norsa 

— Relazioni Esterne — V.le 

Cassala, 22 — 20143 Milano 

— Tel. (02) 83.874.1 
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LA DIGITAL EQUIPMENT CORPORA TION (DEC) AFFIDA 
AD AZIENDE ITALIANE IMPORTANTI COMMESSE DI SUBFORNITURA 


La Digital Equipment Corporation 
(DEC) ha affidato alla Fimi 
S.p.A. di Saronno, società del 
gruppo Philips, una importante 
commessa per la fornitura di mo- 
nitors a colori che saranno utiliz¬ 
zati su scala mondiale per le work¬ 
station grafiche a colori Digital. 

Il contratto, della durata di tre 
anni prevede la produzione negli 
stabilimenti di Saronno della Fimi. 
Il contratto con la Fimi è uno dei 
più importanti sinora stipulati dal¬ 
la Digital Equipment Corporation 
con aziende europee e si inquadra 
in un programma di sempre più in¬ 
tenso utilizzo di risorse produttive 
locali per la fornitura di compo¬ 
nenti e sottosistemi costruiti su 
specifiche Digital. 


Secondo ring. Gian Paolo Carpa- 
nese, Direttore della Pianificazione 
Strategica della Digital Equipment 
S.p.A. “questo contratto non è il 
primo stipulato con aziende italia¬ 
ne, anche se è certamente il mag¬ 
giore in termini quantitativi. 
Alcuni mesi fa è stato infatti stipu¬ 
lato un contratto del valore di cir¬ 
ca due milioni di dollari con la 
Zincocelere di Cavaglià, società 
del gruppo Olivetti, per la fornitu¬ 
ra di circuiti stampati. 

Inoltre è appena iniziata una colla¬ 
borazione con la Italtel, società del 
gruppo STET, che produrrà nei 
suoi stabilimenti di Milano dei sot¬ 
toinsiemi di alimentazione che ver¬ 
ranno incorporati negli elaboratori 
della linea VAX mentre si prevede 


di estendere la collaborazione alla 
produzione di altri sottoinsiemi”. 
L’Ing. Carpanese ha inoltre affer¬ 
mato che “questi accordi non ri¬ 
marranno isolati. 

Oltre a un considerevole contribu¬ 
to alla bilancia commerciale italia¬ 
na essi favoriranno il trasferimen¬ 
to di know-how produttivo in un 
settore fra i più tecnologicamente 
avanzati”. 

A sua volta, il Dr. Pier Paolo 
Monduzzi, Amministratore Dele¬ 
gato della Digital Equipment 
S.p.A., ha dichiarato che “questo 
annuncio rappresenta una naturale 
evoluzione della presenza Digital 
in Italia, testimoniata anche dal re¬ 
cente investimento nel Centro Eu¬ 
ropeo per la Fabbrica Automatica 


di Torino”. 

La Digital Equipment S.p.A. ha 
registrato nell’anno fiscale 1984- 
85, chiuso il 30 giugno 1985, un 
fatturato di 260 miliardi di lire, 
con un incremento del 56 per cento 
rispetto all’esercizio precedente. 
Attualmente i dipendenti Digital in 
Italia sono circa 1.100, dislocati in 
6 filiali, 23 centri di assistenza e 3 
centri di addestramento e forma¬ 
zione. 

In Europa la Digital occupa com¬ 
plessivamente oltre 17.000 dipen¬ 
denti, di cui 2.900 nelle 6 fabbriche 
di Galway e Clonmel (Irlanda), 
Ayr (Scozia), Kaufbeuren (Germa¬ 
nia), Nijmegen (Olanda) e Valbon- 
ne (Francia). 


PIÙ VERSATILE IL SISTEMA 
APPLE EDIT 


Come è noto la Apple, utilizzando 
la propria tecnologia Macintosh e 
LaserWriter, ha lanciato lo scorso 
anno un sistema di “Editoria indi¬ 
viduale testo-grafica” (Edit) che 
ha suscitato grande interesse pres¬ 
so tutti gli enti, istituti ed aziende 
che realizzano proprie pubblicazio¬ 
ni e presso le stesse aziende grafi¬ 
che e tipografiche di medie dimen¬ 
sioni. 

Tra le ragioni del favorevole acco¬ 
glimento della proposta Apple, i 
grandi vantaggi ottenibili in termi¬ 
ni di risparmio di costi e di tempi 
di composizione e stampa. 

Il sistema Apple Edit si è oggi ar¬ 
ricchito, con l’annuncio effettuato 
in occasione della inaugurazione di 
“Apple World Expo” a San Fran¬ 
cisco, di una opzione relativa alla 
stampante Apple LaserWriter. 
Questa opzione comprende una 
espansione di memoria da 500kb a 
1 Mb e una nuova famiglia di ca¬ 
ratteri. 

Con LaserWriter potenziata e Ma¬ 
cintosh ogni utente ha virtualmen¬ 
te una tipografia sul proprio tavo¬ 
lo per produrre libri, riviste, rap¬ 
porti, grafici, slides, newsletter, 
brochure senza bisogno di grafici, 
impaginatori e tipografi. 

Le famiglie di nuovi caratteri che 
si aggiungono alle quattro origina¬ 
rie — Helvetica, Courier,Times, 
Symbol - sono: 


Paladino 

New Century Schoolbook 
Helvetica stretto 
ITC Bookman 
ITC Avant Garde 
ITC Zapt Chancery 
ITC Dingbats 

considerati tra i più utilizzati e dif¬ 
fusi alfabeti grafici. 

1 caratteri tipografici disponibili 
salgono così a 35 con un numero 
virtualmente illimitato di stili (sot¬ 
tolineato, grassetto, chiaro...) e 
corpi a secondo del programma 
utilizzato. 

LaserWriter può essere utilizzata in 
rete Apple Talk, con un numero 
massimo di 31 Macintosh collegati 
ma anche con Personal Computer 
IBM e IBM compatibili (anche sot¬ 
to Unix), utilizzando prodotti di 
terze parti (ad es. la scheda IBM/ 
Apple Talk) e packages MS-DOS 
molto diffusi quali Microsoft 
Word e Chart. 


SCR Associali - Sig. Luca 
Mortara - Foro Bonaparte, 70 

- Milano - Tel. (02) 80.92.31 

Appiè Computer - Palazzo Q8 

- Milanofiori - 20089 Rozzano 
(MI) - Tel. (02) 84.42.156 


IL TELEFONO AMICO 


Si trova a Vignate, sede del 
nuovo magazzino 3M, il Fax 
Center, il primo e unico centro 
di diagnosi per telecopiatori 
esistente in Italia. 

Presso il centro sono state in¬ 
stallate attrezzature di rileva¬ 
zione per l’individuazione dei 
problemi di trasmissione e dei 
guasti: i clienti di tutta Italia 
possono chiamare durante il 
normale orario di lavoro. La 
chiamata viene gestita da un 
tecnico che, con l’aiuto delle 
attrezzature di diagnosi, ana¬ 
lizza il segnale in arrivo e gene- 


II Fax Center 3M di Vignate 

ra segnali campione per indivi¬ 
duare i problemi. 

Nel 40% dei casi il problema 


viene risolto per telefono: mol¬ 
to spesso, infatti, si tratta di 
problemi di carattere operativo 
strettamente legati all’utilizzo 
dell’attrezzatura. Quando que¬ 
sto non è possibile, viene im¬ 
mediatamente informata l’assi¬ 
stenza tecnica locale, accele¬ 
rando e facilitando così l’inter¬ 
vento successivo. 

I vantaggi sono consistenti. In 
entrambi i casi si ha un notevo¬ 
le risparmio nei tempi di attesa 
ed una consistente riduzione 
del fermo macchine, a tutto 
vantaggio del cliente. 


3M Italia — Ufficio Stampa e 
Relazioni di Prodotto — 

20090 Milano S. Felice/ 
Segrate — Tel. (02) 7545 
2595/2573 
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I VOSTRI DISCHETTI SONO COMPATIBILI 


BASF, prendendo spunto da que¬ 
sta domanda, affronta il problema 
della compatibilità dei dischetti. 
Compatibile è una parola anglo- 
sassone che deriva dal latino 
“compatibilis”; i dischetti del si¬ 
stema A si possono usare sul siste¬ 
ma B solo se i due sistemi sono 
compatibili fra loro. Ciò avviene 
quando si usano sistemi operativi e 
dischetti dello stesso tipo e forma¬ 
to. 

Per interderci, un dischetto usato 
con un sistema operativo M-DOS 
non può essere usato con un siste¬ 
ma COM. 

I Flexy Disk da 8”, 5.25” e 3.5” 
funzionano con un drive dello stes¬ 
so tipo. Ad esempio, un Flexy 
Disk doppia faccia/doppia densità 
può essere utilizzato anche su un 
drive ad una testina ma ne verrà 
registrata solo una faccia in quan¬ 
to al sistema è impossibile avere 
accesso alla seconda faccia. 
Possono nascere problemi di “in¬ 
compatibilità” rispetto alla densità 
di traccia e dati. 

Mentre è possibile usare floppy te¬ 
stati per un’alta densità di registra¬ 
zioni con apparecchi a densità più 


bassa è molto più difficoltoso che 
avvenga il contrario: potrebbero 
essere compromessi i dati registra¬ 
ti. 

I FORMATI DEVONO 
ESSERE UGUALI 
Un altro fattore molto importante 
è la conformità dei formati. 

11 formato non è altro che lo spa¬ 
zio riservato sul dischetto alla regi¬ 
strazione dei dati. 

Un utente che utilizza dischetti con 
16 settori di 256 KBytes ciascuno 
non può utilizzare sistemi con altri 
formati dati, ad esempio con 16 
settori di 512 KBytes ciascuno. 

Nel primo caso infatti il program¬ 
ma del sistema registra 256 pezzi di 
informazioni in un certo settore 
che non potrebbe ritrovare se cam¬ 
biasse tale formato. 

È altrettanto impossibile che un si¬ 
stema studiato per una singola 
densità riesca a leggere dati a dop¬ 
pia densità. 

Per una ragione molto simile è dif¬ 
ficile che sistemi a settorizzazione 
soft siano compatibili con sistemi 
a settorizzazione hard. 

SCAMBI TRA SISTEMI. 

1 Flexy Disk possono essere scam¬ 


biati tra sistemi diversi solo nel 
caso che le caratteristiche del di¬ 
schetto e dei sistemi siano identi¬ 
che. 

I computer con sistemi differenti 
ma con lo stesso sitema operativo 
possono, sotto alcune condizioni 
tecniche, scambiarsi i dati via Mo¬ 
dem. 

C’è anche un’eccezione, la compa¬ 
tibilità tra dischetti 8” doppia den¬ 
sità e dischetti da 5.25” ad alta 
densità, anche se avviene in nume¬ 
ro limitato. Si potrebbe ad esem¬ 
pio registrare dati su 16 settori con 
256 bytes su 79 tracce su ciascuna 
delle due facce. 

Se il Floppy Disk Drive adeguato 
da 8” e da 5.25” viene collegato 
ad un comune sistema i dati posso¬ 
no essere trasferiti da un dischetto 
all’altro. 

FATE ATTENZIONE 
QUANDO COMPRATE 
I DISCHETTI 

È un vizio dell’utente di computer 
di riporre poca attenzione al mo¬ 
mento dell’acquisto di nuovi di¬ 
schetti per il proprio sistema. 

Chi inizializza da solo i dischetti 
pensa raramente a quale formato 


dati ha finora utilizzato. 
Bisognerebbe invece prendere in 
considerazione tutti i criteri finora 
menzionati, perché potrebbe acca¬ 
dere che il drive non riesca a legge¬ 
re i dati registrati. 

La varietà di piccoli computer esi¬ 
stenti sul mercato rende necessaria 
la consultazione di una guida: la 
BASF ad esempio produce più di 
600 tipi differenti di dischetti. 

È COMPATIBILE 
IL MIO DISCHETTO? 

Si se sono identiche le seguenti 
condizioni (esempio con un Flexy 
Disk da 5.25”): 

— Sistema operativo = M-DOS, 
COM, ecc. 

— Formato del dischetto = 5.25 

— Numero di sup. registr. = 1 o 
2 

— Densità di registr. = 2768, 
5536 o 9646 bpi 

— Densità di traccia = 48 o 96 tpi 

— Settorizzazione = Hard o Soft 

Data Base S.p.A. 

Viale Legioni Romane, 5 - 
20147 Milano - Tel. (02) 

40.303 

Studioiemmepi S.r.l. - Te! 

(02) 49.82.340 


DUE NUOVE STAMPANTI 
LASER DA TAVOLO 
DATA GENERAL 


E ARRIVATO 
SYMPHONY IN 
ITALIANO 

Con la diffusione dei pesonal com¬ 
puter, è emersa la necessità di for¬ 
nire agli utenti pacchetti software 
sempre più “user friendly” cioè 
facili da apprendere e da utilizza¬ 
re, con messaggi il più possibile in 
linguaggio naturale, comandi sem¬ 
plici da utilizzare e facili da ricor¬ 
dare. Molto spesso ci si è però di¬ 
menticati di un altro fondamentale 
elemento: la traduzione del soft¬ 
ware e dei relativi manuali nella 
lingua nazionale dell’utente, un 
fattore che è anche indice di matu¬ 
rità di un’azienda e del suo interes¬ 
se verso i vari mercati nazionali. 
In quest’ottica si inquadra l’odier¬ 
no annuncio della Lotus Develo- 
pment Corporation, con cui la so¬ 
cietà comunica la disponibilità del¬ 
la versione italiana di “Symphony 
1.1” — suo noto pacchetto inte¬ 
grato — release conforme alle 
nuove specifiche di memoria 
espansa Lotus/Intel/Microsoft e 


che quindi supporta fino a 4 Mby¬ 
te di memoria principale (RAM). 
La versione italiana del pacchetto 
è stata tradotta integralmente; l’u¬ 
tente che acquisterà “Symphony” 
troverà una ricca e completa docu¬ 
mentazione composta da un ma¬ 
nuale dei comandi che spiega ap¬ 
profonditamente le caratteristiche 
di ciascun comando o funzione, da 
un manuale d’uso che insegna ad 
utilizzare i comandi durante il la¬ 
voro, da un manualetto contenente 
informazioni sul programma e sul¬ 
le procedure più semplici per co¬ 
minciare ad usarlo, da una guida 
che riassume le funzioni disponibi¬ 
li, dalle maschere per la persona¬ 
lizzazione della tastiera e dai sei di¬ 
schetti che compongono e correda¬ 
no il pacchetto. 

Tutti i possessori delle precedenti 
versioni di “Symphony” potranno 
trasformale in quella nuova, a un 
costo fisso, contattando la J. Soft 
di Milano, distributore italiano au¬ 
torizzato dei prodotti Lotus. 

Bit Relations - Sig. Giuseppe 

Turri - Tel. (02) 86.27.49 


Data General annuncia due nuove 
stampanti laser da tavolo in grado 
di rispondere alle esigenze di que¬ 
gli utenti che necessitano di stampe 
di qualità dei testi e di capacità 
grafiche avanzate; possono quindi 
essere utilizzate sia come stampan¬ 
ti di sistema, sia come stampanti 
dedicate ad un posto di lavoro ad 
alta produttività e qualità, dedica¬ 
to principalmente alle attività di 
elaborazione dei testi. 

Le stampanti Data General model¬ 
lo 4557 e 4558 offrono entrambe 
un’alta velocità di stampa — fino 
ad otto pagine al minuto — unita 
ad una definizione del carattere di 
300 punti per pollice e alla possibi¬ 
lità di scegliere varie opzioni di 
stampa. Insieme alle stampanti 
vengono forniti quattro diversi set 


di caratteri standard; altri set sono 
disponibili come opzioni. 

Oltre a queste caratteristiche, la 
stampante 4558 può stampare 
un’intera pagina in modalità grafi¬ 
ca con definizione di 300 punti per 
pollice, quindi supporta tutti tipi 
di grafici commerciali producibili 
col CEO, compresi Trendview, 
CEO Drawing Board, CEO Word- 
view e quelli di formato libero. 


Data General S.p.A. 

— Roma, Via G. Armellini, 
10 - Tel. (06) 59.14.644/ 
923 

— Cinisello Balsamo (MI), 

Via F.lli Gracchi, 36 - Tei 
(02) 61.20.141. 
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LA RIPRESA TV CON IL COMPUTER 



LE MERAVIGLIE DEL 
COMPUTER ALLA TV 

La ripresa TV con Taiuto del computer è possibile grazie alla messa a punto di 
schede grafiche come quella che presentiamo a cura della Sirio Informatica e 
della BLT. Queste consentono di soddisfare tutte le applicazioni odierne della 
videografica. Oramai il computer fa miracoli... 

di Claudio Santucci 


L'immagine è stata realizzata dalla Sigraph avvalendosi della scheda Targa 
(AT&T) che offre una definizione di 512x512 punti ed è disponibile anche 
in versione Pai. 


Sia la scheda ICB che la scheda Targa, possono essere genlocate 
permettendo così il collegamento delle stesse con banchi di regia o 
macchine Broadcaster. 



— 



L’applicazione delle capacità di gestione 
dell’immagine, messe a disposizone da 
uno strumento come il calcolatore sono 
una conquista relativamente recente del 
mondo dell’elettronica. 

Eppure in questo breve lasso di tempo 
sono stati compiuti passi da gigante nella 
messa a punto di apparecchiature sem¬ 
pre più sofisticate e di programmi per ge¬ 
stire il flusso di impulsi da decodificare e 
riproporre come immagine. 


COMPORRE E SCOMPORRE 


Un oggetto è visibile in quanto viene col¬ 
pito dalla luce e la stessa viene riflessa a 
seconda della composizione dell’oggetto 
e colpisce la periferica specializzata del 
nostro sistema: gli occhi. 

Noi, però, non siamo in grado di modifi¬ 


care, se non con la fantasia, la rappre¬ 
sentazione dell’oggetto che ha “impres¬ 
sionato” l’occhio. 

Bisognerebbe avere a disposizione un ap¬ 
parecchiatura in grado di scomporre nei 
minimi dettagli l’immagine in questione, 
permettendo così, a chi opera, di “lavo¬ 
rarci sopra” per ottenere i risultati desi¬ 
derati. 

Un’immagine, quindi, è composta da de¬ 
cine di migliaia di punti che hanno diver¬ 
si colori e sfumature e, per modificare e 
manipolare adeguatamente l’oggetto in 
questione, è necessario poter gestire pun¬ 
to per punto tutta la situazione. 


IL COMPUTER E LA TECNICA 


Proprio il computer si presta in maniera 


eccellente alla gestione, punto per punto, 
di un’immagine. 

Naturalmente si tratta di computers con 
prestazioni di un certo rilievo e dotati di 
una buona velocità di elaborazione. Le 
immagini vengono analizzate man mano 
che giungono all’interno dell’elaboratore 
e grazie al supporto di particolari schede 
grafiche vengono scomposte e riprodotte 
in tempi reali, con opportuni meccanismi 
di sincronia. Una volta che l’immagine è 
scomposta in ogni suo punto, si rendono 
possibili numerose manipolazioni della 
stessa in termini di colore, sfumature, 
modifiche, aggiunte, sovrapposizioni ed 
altro ancora. 

Le aziende del settore, e tra queste la Si¬ 
rio Informatica, hanno puntato con deci¬ 
sione in questa direzione mettendo a pun¬ 
to, in continuazione prodotti sempre più 
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affidabili, dal prezzo, la qual cosa non 
guasta di certo, realmente interessante. 


IL PALCOD 


La sezione grafica della Sirio informati¬ 
ca, la SIRGRAPH, ha messo a punto, ul¬ 
timamente, e dato il via alle vendite del 
PALCOD, in collaborazione con la BLT. 
Il PALCOD è una scheda che consente la 
trasformazione di un segnale video a co¬ 
lori RGB, in un segnale video PAL. 

La scheda è stata studiata per computers 
IBM/compatibili. La scheda PALCOD 
viene collegata all’uscita per la scheda 
grafica del computer con uscita RGB, 


necessiL. no di altri collegamenti supple¬ 
mentari, altro particolare che fa aumen¬ 
tare l’interesse per questo prodotto. Il 
prezzo d vendita della scheda PALCOD è 
di L. 1.200.000. 


IL PALSYNC 


Dalla stessa inesauribile fonte proviene 
un sincronizzatore per le schede grafiche 
Number Nine e Galaxy, il PALSYNC. 

Il segnale proveniente dall’esterno, come 
per esempio da una telecamera o da un 
televisore, viene “processato” dalle sche¬ 
de grafiche citate prima, ed il PALSYNC 


gie messe a disposizione dall’elettronica 
risultavano, ancora, troppo costose per 
essere sempre convenienti. 

Oggi si è riusciti a superare anche questa 
difficoltà permettendo un uso massiccio 
di queste nuove metodiche, dando origi¬ 
ne ad un vero e proprio boom dell’imma¬ 
gine digitalizzata. 

IL SISTEMA AT&T 


Questo sistema di elaborazione di imma¬ 
gini è uno degli esempi migliori al discor¬ 
so fatto in precedenza. 

Il sistema AT&T proposto dalla Sirgraph 
permette di trattare in breve tempo una 



L immagine è realizzata da Sigraph con scheda grafica ICB e software ICB 
TIPS (AT&T). Il sistema utilizzato permette la digitalizzazione, tramite 
telecamera, con 32.000 colori contemporanei disponibili e la possibilità di 
intervenire artisticamente suITimmagine. 



Il software 1CB TIPS (AT&T) permette la riproduzione di parti di immagini 
digitalizzate e l’intervento sulle stesse. 

Si possono così associare immagini reali a sfondi o parti create tramite il 
software TIPS. 


oppure può essere applicata su un sup¬ 
porto separato. 

In sostanza, l’immagine elaborata dal 
computer, viene analizzata dal PALCOD 
che prowederà alla sua conversione in 
segnale video per essere, poi, visualizza¬ 
ta su di un monitor PAL. Il PALCOD di¬ 
spone di un altro collegamento verso un 
secondo apparato, ad esempio un video¬ 
registratore. 

Un aspetto interessante è dato dal fatto 
che la scheda PALCOD dispone di un 
proprio generatore di sincronismi per la 
codifica in segnale video PAL, e non ha 
bisogno di aggiunte esterne. La facilità di 
collegamento con schede grafiche con 
uscita RGB, tipo Number Nine e Galaxy, 
ne fa un prodotto di grande interesse. 

E possibile, inoltre, collegare segnali 
RGB sia con sincronismo separato, sia 
con sincronismo inserito sul video segna¬ 
le del verde (un immagine a colori è data 
dalla diversa miscelazione dei tre colori 
base: verde, rosso, blu). 

I collegamenti esterni con monitor PAL e 
con videoregistratore, ad esempio, non 


sincronizza questo lavoro. 

Il PALSYNC può essere collegato, per la 
visualizzazione del segnale ormai elabo¬ 
rato, ad un monitor RGB con standard 
CCIR oppure ad una TV con Prese Scart. 
E possibile connettere un videotape attra¬ 
verso un opportuno codificatore RGB/ 
PAL. Il PALSYNC viene venduto a L. 
1.395.000. 


L’ERA DELL’IMMAGINE 


In un mondo che va sempre più in fretta 
diventa di vitale importanza saper pro¬ 
porre immediatamente l’aspetto vincente 
della propria attività. 

Il mondo della pubblicità che fa dell’im¬ 
magine il suo punto di forza è senz’altro 
uno dei settori più interessati a questa 
escalation tecnologica. 

Fino a qualche anno fa si era legati alle 
immagini in quanto tali. Era certo possi¬ 
bile arricchire ed abbellire quello che ve¬ 
niva proposto, ma ci si trovava di fronte, 
per forza, a vincoli ben precisi. 

D’altro canto, l’ausilio di nuove tecnolo- 


immagine elaborando velocemente diver¬ 
se varianti della stessa. Una volta ottenu¬ 
ta la combinazione desiderata si può an¬ 
che tornare al sistema tradizionale, per 
esempio fotografando la combinazione 
prescelta e passarla in stampa. 

La configurazione prevista dagli ideatori 
di questo efficace sistema è organizzata 
nel modo seguente: 

— Un computer PC IBM/compatibile 
con hard-disk. 

— Tavoletta di alta qualità per visualiz¬ 
zare l’elaborato. 

— Telecamera che consenta la digitaliz¬ 
zazione dell’immagine. 

Ripetiamo ancora una volta che l’imma¬ 
gine può essere scomposta in una serie di 
“puntini” che con l’ausilio di un computer 
possono essere manipolati uno per uno. 
L’immagine ripresa dalla telecamera e 
digitalizzata, viene passata al vaglio del 
computer che, dopo opportuno tratta¬ 
mento, renderà visibile l’immagine elabo¬ 
rata proveniente o dalla telecamera o 
dalla tavoletta grafica. 

La risoluzione è di 512x512 punti. Ognu- 
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LA RIPRESA TV CON IL COMPUTER 


sioni: 

— TARGA 8 - Elabora 256 toni differen¬ 
ti di grigio (8 bit per Pixel). 

— TARGA 16 - Permette la gestione di 
32.768 colori contemporaneamente 
(16 bit per pixel). 

- TARGA 24 - Elabora 16.777.216 co¬ 
lori diversi e tutti insieme (24 bit per 
pixel). 

- TARGA 32 - Supporta 16.777.216 
colori con 128 livelli diversi. Si pos¬ 
sono sovrapporre immagini statiche e 
riprese in diretta. 

L’elaborazione delle immagini avviene, 
per tutti i modelli, in “tempo reale” con la 
frequenza di 1/60 di secondo. Il TARGA 


8 elabora solo segnali monocromatici RS 
170, mentre i TARGA 24 e 32 trattano 
segnali per lo standard RGB (il normale 
colore). Le immagini così manipolate 
possono essere memorizzate e richiama¬ 
te ogni qualvolta se ne abbia bisogno, 
consentendo anche trasmissione telefoni¬ 
ca per mezzo di un MODEM. 

COME LAVORA IL SISTEMA 
_ DELL’AT&T _ 

Il programma che consente di elaborare 
le immagini con questo sistema, inizia 
presentando un menù con le varie opzioni 
da scegliere. La selezione risulta molto 


no dei punti, poi può essere colorato in 
32.768 colori diversi. Quello che rende 
possibile la visualizzazione deH’immagine 
è la scheda TARGA. 


LA SCHEDA TARGA 

Questa è stata messa a punto dalla 
AT&T e consta, appunto, di un digitaliz¬ 
zatore di immagine o di disegni eseguiti 
con la tavoletta grafica. 

La scheda è alloggiata aH’interno di un 
PC IBM o compatibile. 

La sua elasticità di impiego è aumentata 
dal fatto che ne esistono ben quattro ver¬ 


L’immagine, realizzata dalla Sigraph con il software Artwork (AT&T), Number Nine con la quale è possibile visualizzare 256 colori contempora- 

permette la creazione e la colorazione di elementi tridimensionali. neamente, da una scelta di 16 milioni. 

Il software ragginge la massima espressione se utilizzato con la scheda 


USCITE SCHEDA GRAFICA 


PC IBM 
o 

COMPATIBILE 


RGB (+ sync) 


- m 

- >■ 

SCHEDA 

- 

: 

PALCOD 


CT> 




La scheda r ALCOL) e un codificatore PAL che 
trasforma un segnale video analogico a color 
RGB in un segnale video PAL. Dispone di ur 
suo generatore di sincronismi e può collegare sic 
segnale RGB, sincronismo separato, sia cor 
sincronismo inserito sul segnale del verde. 


MONITOR 

PAL 


VIDEOREGISTRATORE 


LIST 4 


15 

















































































































































































































































































































































LA RIPRESA TV CON IL COMPUTER 



TELECAMERA RGB A COLORI 




L immagini, realizzate dalla Sigraph sono un tipico esempio di come si nuovo scelto per la presentazione di modelli e tessuti nell’area dei tessili e 
possa digitalizzare ed associare tra di loro differenti figure con la scheda ICB degli stilisti. 

(AT&T). Nel caso specifico la composizione delle immagini è lo strumento 


chiara e facile da effettuare. 

E possibile disegnare a mano libera si¬ 
mulando, anche la maggiore o minore 
pressione della matita su di un foglio di 
carta. Il tratto può essere più fine o gros¬ 
solano, a seconda della esigenza, ed è 
addirittra possibile simulare e determina¬ 
re la colorazione di una parte del foglio 
così come la si otterrebbe con uno spruz¬ 
zatore di colore. 

E possibile selezionare figure precise e 
riempire (Fili) di un certo colore una por¬ 
zione di schermo a piacimento. 

La scelta dei colori da usare è data da 
una tavolozza. Un’altra possibilità è la 
creazione di miscele di colore che è pos¬ 
sibile eseguire di volta in volta, sceglien¬ 
do anche il grado di saturazione e la lu¬ 
minosità del colore stesso. 

Ma le meraviglie non finiscono certo qui. 
E possibile infatti, spostare sullo scher¬ 
mo porzioi : dell’immagine che si sta ela¬ 
borando, alterandone il colore e la com¬ 
posizione. 

Ogni passo di questa operazione è me- 
morizzabile separatamente ed è possibile 
richiamarlo in ogni momento, aumentan¬ 


do di molto le capacità di manipolazione 
offerte da questo sistema. 

IL SOFTWARE 

Le apparecchiature e le varie schede gra¬ 
fiche, quindi, non sono l’unica compo¬ 
nente di questa importante conquista tec¬ 
nologica. 

Oltre ad avere delle componenti fisiche è 
altrettanto importante poter disporre di 
programmi potenti in grado di poter ge¬ 
stire tutte queste apparecchiature per 
sfruttarne al meglio le potenzialità. 
L’ultimo prodotto della Sirio Informatica, 
in fatto di software grafico è l’Artwork 
Environment. 

Questo sistema è formato da diversi pro¬ 
dotti elaborati per venire incontro alle più 
disparate esigenze in fatto di grafica. 

I programmi si integrano tra di loro per 
una efficace gestione grafica anche a tre 
dimensioni. E possibile scegliere fino a 
16 milioni di colori, visualizzabili in con¬ 
temporanea 256 alla volta. 11 sistema 
consente anche la ripresa da telecamera 
con trasferimento immediato alla memo¬ 
ria dell’elaboratore. 


L’Artwork Environment è composto dai 
seguenti programmi compatibili tra di 
loro: 

— ARTWORK - Utilizza diverse pagine 
grafiche sovrapponibili tra di loro. 
Consente la realizzazione di immagi¬ 
ni tridimensionali con la rimozione 
delle linee nascoste. E possibile mo¬ 
dificare le ombre simulando lo spo¬ 
stamento della ipotetica sorgente lu¬ 
minosa che illumina i solidi disegna¬ 
ti. 

— BRUSHWORK - Creato per l’elabo¬ 
razione di immagini riprese da teleca¬ 
mere e disegni creati a mano libera. 
Le combinazioni di colore, intensità e 
sfumature sono virtualmente infinite. 

— CHARTWORK - Programma atto 
alla visualizzazione di dati sotto for¬ 
ma di grafici e diagrammi a torta e a 
barra. 

Tutto il sistema Artwork Envirnment la¬ 
vora su PC IBM o compatibili. Il suo lan¬ 
cio nel nostro Paese è imminente e sarà 
disponibile nella versione ANIMATION 
TWO per elaborazione di animazione tri¬ 
dimensionali. 
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L'IMPORTANZA 
DEL PROGETTO "TRON" 

di Sergio D’Alesio 


Nessuno si rese conto, con esattezza, al¬ 
l’uscita originaria del film nel 1981, del¬ 
l’importanza che avrebbe rivestito questo 
genere di pellicola cinematografica, ma¬ 
nipolata ed, addirittura, ambientata come 
concept-story aM’interno della dimensio¬ 
ne “vivente e pensante autonomamen¬ 
te” di un computer. La recente realizza¬ 
zione di “Tron” su videodisco (ndr. di¬ 
sponibile, attualmente, presso il Lab 3 di 
Milano) e in una videocassetta VHS dota¬ 
ta di un godibilissimo Hi-Fi Stereo Dolby 
System, l’ha fatto ritornare di stretta at¬ 
tualità. Tanto è vero che nella clipteca 
dei lettori di List non dovrebbe mancare 
assolutamente. A corredo compiuto del 
nostro dossier, abbiamo inserito una in¬ 
tervista con mister Donald Kushner, pro¬ 
duttore di “Tron”, recentemente passato 
a Roma per motivi di lavoro. 


TRON 


Per chi avesse mancato, in passato, l’ap¬ 


puntamento con questo fantastico capo¬ 
lavoro, un magico connubio tra avventu¬ 
ra ed alta tecnologia, precisiamo che 
“Tron”, non è un film di fantascienza, né 
un film “spaziale”, ma, semplicemente, 
una grande avventura del prossimo futu¬ 
ro che si svolge nel mondo della fanta¬ 
sia. In sintesi, è la storia di un giovane 
genio del computer (interpretato dall’at¬ 
tore Jeff Bridges) che, tentando di met¬ 
tere in “corto circuito” un programma 
difettoso in un sistema computerizzato 
di vaste dimensioni “entrandovi” illegal¬ 
mente, viene trascinato in un altro mon¬ 
do che poi è sostanzialmente un univer¬ 
so tridimensionale composto di elettrici¬ 
tà e di luce che vive parallelamente con 
il mondo reale degli umani. Le fantasti¬ 
che vicende di “Tron” hanno luogo, 
quindi, in due mondi: il mondo reale di 
carne e sangue in cui l’elaborato siste¬ 
ma di un computer è controllato da un 
singolo programma e il mondo elettroni¬ 
co, in cui esseri elettrici e luminosi vo¬ 
gliono cancellare il programma che con¬ 


trolla dispoticamente'le loro vite. 


LE GENESI DEL FILM 


Sui giornali specializzati americani la pri¬ 
ma notizia sul progetto “Tron” apparve 
nel lontano 1977. Il regista Steven Li- 
sberger e il produttore Donald Kushner 
cercarono d’interessare diversi studios 
americani alla story-board di “Tron” e, 
subito dopo, cominciarono a lavorare at¬ 
torno all’idea di metterlo sù come produt¬ 
tori indipendenti con un budget di sei mi¬ 
lioni di dollari (circa 12 miliardi di lire). 
Lisberger esaminò diversi approcci al 
soggetto e pensò anche d’includervi un 
disegnato animato tradizionale. Uno dei 
fattori determinanti nella genesi del film 
doveva, però, essere la partecipazione di 
Richard Taylor, un ex-dirigente della 
Abel Associates (una Società di effetti 
speciali), poi, diventato Presidente della 
Triple One Information International In- 
corporated, specializzata in animazioni 



Tron nel Moto-Labirinto. Fiynn in un intercettatore. 
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col computer, con sede a Los Angeles. 
Da quel momento la story-board del film 
previde una combinazione tra attori, 
un’animazione mediante computer ed 
una tradizionale su cellulosa. Di lì a 
poco, il progetto “Tron” ottenne l’inte¬ 
resse incondizionato del vice-presidente 
del dipartimento cinema e produzioni te¬ 
levisive degli studi Disney, mister Tom 
Wilhite. 


LA REALIZZAZIONE DI TRON 


La caratteristica più importante di 
“Tron” è, senz’altro, l’uso estensivo di 
tecniche rivoluzionarie e, soprattutto, 
quella dell’animazione controllata da un 
computer. In “Tron” ci sono 15 minuti 
d’animazione interamente realizzati dal 
computer e questo è un dato di fatto che 
lo contraddistingue rispetto a tutti gli altri 
films di fantascienza realizzati preceden¬ 
temente o in seguito. Sui 96 minuti che 
costituiscono l’intera durata del film, si 
ritiene “fantasticamente dalla story- 
board” che 56 di essi si svolgano all’in¬ 
terno del computer, nel mondo elettroni¬ 
co. 

Per realizzare queste immagini sono ser¬ 
viti 286 disegni scelti tra i 350 realizzati 
appositamente per il film per mezzo del 
calcolatore. È, a questo punto, che il pro¬ 
getto “Tron” diventa un’esperienza uni¬ 
ca nel suo genere: la Walt Disney Produ- 
ctions non disponeva né del materiale, 
né dell’esperienza necessaria per questo 
genere di animazione e Mr. Kushner si 
rivolse a quattro delle più sofisticate e 
specializzate società americane del set¬ 
tore. 

La prima ad essere contattata fu la Triple 
One di Los Angeles, presieduta da Ri¬ 
chard Taylor, il cui contributo è, soprat¬ 
tutto, visibile nella seconda parte del 
film. Le tecniche messe a punto da que¬ 
sta società fecero intervenire una combi¬ 
nazione perfetta di una miriade di poligo¬ 
ni, concependo, grazie a Syd Mead e 
Moebius, il cosidetto “vascello solare” 
realizzato con l’unione perfetta di 200 di 
questi poligoni. La seconda fu la MAGI 
(Mathematica! Applications Group Ine.), 
una società di New York alla quale si 
deve l’affascinante sequenza dei “moti 
di luce”, con l’elaborazione progressiva 
di prodotti che, partendo da 25 forme 
elementari disposte in tre dimensioni 
(sfere, coni e poliedri), vengono combi¬ 
nati insieme per ottenere i risultati voluti. 
La terza società, la Digital Effects, an- 
ch’esa di New york, s’interessò di realiz¬ 
zare un’altra creazione di Syd Mead, il 
“Byte”, elemento di accompagnamento 
del gioco elettronico, a forma di Bibbia, 
che seguiva ideologicamente i personag¬ 
gio di Flynn nel corso delle sue avventu¬ 
re. Fu interpellata, infine, l’Abel Associa¬ 


tes di Los Angeles responsabile della for¬ 
midabile sequenza nel corso della quale 
Flynn (l’attore Jeff Bridges) viene scon¬ 
tornato in milioni di particelle microscopi- 
che dal Master Control Program per pas¬ 
sare dal nostro mondo nell’universo elet¬ 
tronico. In proposito, Syd Mead ha di¬ 
chiarato: “Per creare una immagine il 
computer deve inviare un messaggio ad 
un punto individuabile di luce su di un 
monitor. All’arrivo del messaggio, i pro¬ 
grammatori mettono in codice le informa¬ 
zioni riguardanti il colore e l’intensità di 
ogni punto di luce. Ogni immagine fatta 
dal computer contiene milioni di punti di 
luce, ognuno dei quali deve essere pro¬ 
grammato per ogni fotogramma del film. 
Se si pensa che per creare un fotogram¬ 


ma occorrono più di 5 milioni di calcoli e, 
non nascondo, che alcune immagini più 
complesse possono richiederne anche 
75 milioni, appare evidente l’immensità 
del compito richiesto alla nostra équipe 
di tecnici per realizzare “Tron’’. Basti 
pensare che per realizzare un minuto del 
film occorrono 1240 fotogrammi...! 
Ultimo anello della catena specialistica 
fu Harrison Ellenshaw, produttore asso¬ 
ciato, responsabile del coordinamento 
generale dei differenti effetti speciali rea¬ 
lizzati singolarmente da queste quattro 
società. Il suo compito più grande è con¬ 
sistito nell’integrare, in un perfetto mo¬ 
saico visivo, l’associazione classica su 
cellulosa, utilizzata per la maggior parte 
delle sequenze con l’animazione del 
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computer. In ragione del frequente uso 
del “black-lighting” si è dovuto riprende¬ 
re a mano, per ridipingerle, più di 75.000 
immagini. Questo compito da solo richie¬ 
se l’ingaggio di ben 500 tecnici, operai 
ed artigiani a Taiwan. Precisa Ellenshaw: 
“Il back-llghting consiste nel filmare gli 
attori vestiti di costumi bianchi e neri su 
di un fondale rudimentale. Gli elementi 
del fondale vengono, poi, aggiunti, ma 
solo in un secondo momento e anch ’essi 


sono in bianco e nero. E tutto questo con 
l’aiuto di una macchina da presa in 70 
mm. con pellicola b.n. Mi ricordo che i 
colori e le luci furono aggiunti in un ulte¬ 
riore terzo stadio e che la perfetta realiz¬ 
zazione del back-lighting si protrasse per 
oltre un quindici mesi, ma, alla fine, i ri¬ 
sultati ci diedero ragione... e fu per tutti 
motivo di soddisfazione infinita’’. A solo 
qualche anno di distanza “Tron” è di¬ 
ventato un classico, una pellicola capo¬ 


scuola manipolata ad arte dal computer 
sulla cui scia sono poi nate altre avventu¬ 
re cinematografiche e televisive, più o 
meno riuscite, senza però, ripetere quel 
magico clima cibernetico, tipico di 
“Tron”. Solo in questo film infatti si è sa¬ 
puto dare vita ad un mondo dove l’ener¬ 
gia vive e respira, dove le leggi della logi¬ 
ca vengono sfidate, vinte e superate, fa¬ 
cendo nascere e fiorire una civiltà elettro¬ 
nicamente perfetta ed irripetibile. 


LA NOSTRA INTERVISTA A DONALD KUSHNER, PRODUTTORE DI “TRON” 


List: Lei s’interessava già ai computers o aveva sempli¬ 
cemente deciso che avrebbero funzionato bene in una 
storia? 

Kushner: “All'incirca verso la metà del 1980, pensammo 
che, pur vivendo in un periodo di rivoluzione informatica, 
nessuno aveva ancora fatto un film su questo tema. Sul 
grande schermo non si era mai visto ciò che potrebbe svol¬ 
gersi all’interno di un calcolatore. Sin dall’inizio avevamo, 
dunque, l’intenzione di utilizzare le risorse del computer nel 
campo dell’animazione e, lavorando all’interno della Walt 
Disney Productions, eravamo molto avvantaggiati in questo, 
perché disponevano dei migliori disegnatori di cartoons esi¬ 
stenti al mondo. 

Erano, già, diversi anni che osservavamo i progressi realiz¬ 
zati da questa tecnica, anche prima di prendere in conside¬ 
razione il progetto “Tron”. Ciò che ha cristallizzato, in ma¬ 
niera definitiva, le nostre intenzioni, dal punto di vista esecu¬ 
tivo e produttivo, è stata quella concomitante esplosione nel 
campo dei video-giochi... Se si pensa che qualche anno fa 
non esisteva nulla di ciò, mentre, ora, l’elettronica compute¬ 
rizzata è una realtà indispensabile per l’industria moderna. 
La Disney è stata un po’ pionieristica in questo, ma non 
credevo, nemmeno allora, che si trattava di un salto nel 
buio, basta vedere il seguito che ha avuto “Tron’’: solo alla 
Disney è uscito “Taron e La Pentola Magica’’ i cui disegni 
animati sono stati manipolati ed ordinati dal computer o la 
nuova produzione, ancora in fase di elaborazione, “Basii Of 
Baker Street” che dovrebbe uscire alla fine del 1986...” 
List: Come si sono evoluti, secondo Lei, i concetti grafi¬ 
ci? 

Kushner: “Per dirla con parole semplici: come un fiore che 
si pianta e non smette di crescere! All’inizio della lavorazio¬ 
ne di “Tron”, tornando un attimo alla pellicola-di-base di 
tutto il sistema tecnologico degli Anni Ottanta, Syd Mead 
aveva disegnato il trasportatore aereo e i moti di luci. In 
seguito tracciò, a grandi linee, il vascello solare, infine s’in¬ 
teressò ai cannoni, alle arene del gioco e al MCP (ndr. Ma¬ 
ster Control Program) e a tutto ciò che lo riguardava. Sul 
set finì per occuparsi anche dei “costumi grafici” degli ele¬ 
menti solidi ridisegnati dal computer, della loro colorazione, 
dei loro movimenti oscillatori e, addirittura, dei costumi che 
gli attori avrebbero indossato all’interno del calcolatore, ini¬ 
ziamo dall’elmetto (ndr. non era, infatti, pensabile che fi¬ 
gure umane che impersonavano unità elettriche od im¬ 
pulsi magnetici di un micro-sistema a circuito stampato 
avessero dei capelli!), alla divisa corporea, alle lande d’e¬ 
nergia sino a scarpe speciali...” 

List: Anche la musica usata proviene da strumenti elet¬ 
tronici? 

Kushner: “La colonna sonora comprendeva, ovviamente, 
degli effetti sonori elettronici. Per ciò che riguardava la mu¬ 


sica facemmo ricorso a Wendy Carlos, un musicista di talen¬ 
to, che da anni componeva direttamente col sintetizzatore, 
filtrando, pulendo ed ordinando i suoni attraverso un cam¬ 
pionatore come il C.M.I. Fairlight. Alla fine, ci sembrò giusto 
che una musica orchestrata che conferisse al film più colore 
dovesse essere più strutturata, meno monolitica, rispetto a 
dei suoni completamente elettronici, freddi e glaciali... Di 
recente, anche un film come “Electric Dreams” ha seguito, 
per l’aspetto sonoro-musicale, questa direzione”. 

List: Qual è secondo Lei l’avvenire dell’animazione per 
mezzo del computer? Usciranno altri films, negli Anni 
Ottanta, come “Tron” oppure una volta sfruttato con 
successo questo tema, i produttori più alla moda come 
Steven Spielberg penseranno ad avviare altri filoni del 
mondo immaginario e del fantastico? 

Kushner: “Esattamente, come dice lei. lo ci vedo una nuo¬ 
va gamma di possibilità, molto estesa tra l’altro, per la 
science-fiction e il fantastico in generale. Il computer offre 
immense risorse, non so, anche per il cinema del terrore, 
per esempio. Joe Dante ha usato questa tecnica per un paio 
di scene di ‘Explorers’ e Robert Zemeckirs, insieme a Spiel¬ 
berg, hanno sfruttato addirittura l'idea di un computer-tem¬ 
porale, montato dentro una macchina da corsa, per ‘Back 
To The Future’ che è stato il campione d’incassi negli Usa 
per il 1985. Infine, anche le più potenti emittenti televisive 
statunitensi hanno creato tutta una serie di mini-film come 
‘Automan’, ‘Supercar’ e ‘The Boys Of Computers’ che fini¬ 
ranno per sensibilizzare ed abituare i mass-media sulle in¬ 
numerevoli possibilità d’impiego del computer nell’era con¬ 
temporanea. Lo stesso Spielberg nelle sue ‘Amazing Sto- 
ries’ (ndr. 75 puntate televisive sul mondo del terrore e 
del fantastico, attualmente in programmazione in Ameri¬ 
ca) ha, più volte, fatto ricorso agli strumenti elettronici, ai 
computers e così via. Detto questo, non credo, però, che 
l’uso del computer sia un mezzo per rivoluzionare la regia 
cinematografica o televisiva: basta vedere l’uso ‘ridotto’ che 
ne ha fatto lo scrittore Arthur C. Clarke per la versione sul 
grande schermo di ‘2010, L’Anno del Contatto’. In definitiva, 
un film come ‘Tron’ deve, necessariamente, essere consi¬ 
derato un film storico e, per certi versi, irripetibile. La sua 
conseguente realizzazione attuale su videodisco e su di una 
videocassetta stereofonica ne consentirà la visione e l’en- 
tertainment casalingo per gli anni a venire. 

In conclusione, il computer sta certo portando verso una 
rivoluzione totale, ma, almeno per il mondo dello spettacolo, 
io lo ritengo solo un’affascinante e comodissimo strumento 
da aggiungere all’armamentario faraonico di trucchi, effetti 
e montaggi che sono a disposizione dei registi durante le 
varie fasi di lavorazione di un film, dapprima sul set vero e 
proprio e poi in studio per i ritocchi finali...”. 
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IL COMPUTER 
NEL FUTURO 


La tecnologia dimensionata 
al quotidiano 


In Australia, grosso esportatore di lana, diventa normale incontrare nelle 


di Anna M. Gabriele 


fabbriche specializzate “Oracolo”, un robot la cui specialità è “spogliare” le 
pecore, dando loro un look più punkizzato, il tutto con una precisione 
travolgente! Nato nel 1979, questo robot ha riscontrato un enorme succes¬ 
so. I professionisti umanoidi osservano con la coda dell’occhio questi oracoli 
come cattivi presagi... 



In Francia, agenzie immobiliari usano il computer per facilitare la scelta di 
una casa o di un appartamento. I clienti, invece di perdere giornate intere in 
visite inutili, possono tranquillamente consultare ciò che di meglio conviene 
in funzione del luogo, del numero delle stanze, delle possibilità finanziarie. Il 
computer darà l’elenco delle disponibilità, tramite un comando audiovisivo, 
appariranno sullo schermo le diapositive delle case scelte. Se il cliente trova 
quello che fa per lui, verrà stampato automaticamente il piano finanziario ed 
anche l’immagine sullo schermo potrà essere fornita su film Polaroid. A 
questo punto si può prendere un appuntamento. 



Sempre in Francia, si possono ora curare le malformazioni dentali con il 
computer! Ecco l’esempio di uno studio odontotecnico il quale è compieta- 
mente gestito dall’informatica: diagnostici, gestione e contabilità, trattamen¬ 
to di testi. Con il primo programma, si realizzano tutte le analisi necessarie 
per la scelta del migliore trattamento possibile con i risultati visualizzati. 


Quanti sono quelli che sanno veramente a che 
livelli siamo arrivati nel campo dell’informatica e 
della robotica? Ormai il fenomeno all’estero è 
diventato “quotidiano”, ma soprattutto è una 
necessità assoluta di sopravvivenza economica. 

Senza questo aggiornamento, la ditta perde la corsa, mentre il di¬ 
sordine colpisce di prima persona l’operatore. 11 computer è diven¬ 
tato così essenziale? Un fatto è comunque certo: se oggi rimane 
possibile sfuggire a questa “necessità informatica”, domani sarà dal¬ 
la nostra nascita che i riflessi saranno educati alla nuova situazione. 
Non dobbiamo pertanto sottovalutare questo periodo transitorio 
che rappresenta la fase di ambientamento. Ma, oltre a queste con¬ 
siderazioni, esaminiamo insieme qualche esempio pratico in cui 
queste nuove tecnologie, sono attuate e senza alcuno, dei tanti 
temuti traumi. 

DALLA PARTI 

dei robots 

Negli Stati Uniti, sono circa no troppo intraprendenti... 

15.000, mentre in Giappone ed Nei ristoranti, il compito loro 

in Europa se ne contano 5.000. assegnato è simile a quello di un 

E questo è solo un inizio perché normale cameriere (con in più 

oramai non si può più fare a la perfezione): prendono ordina¬ 
mene del rappresentante della zioni, servono a tavola, non di¬ 
quinta generazione informatica, menticano mai quello che è sta- 

presente un po’ ovunque: il to ordinato e hanno sempre un 

“Personal Robot”. gentile complimento per la Si- 

Nei Consumer Electronic gnora. Nei parchi di attrazione 

Show di Las Vegas e di Chica- come Disneyland, uno dei primi 

go, si vedono robots distribuire attrezzato di tale “material”, de- 

depliants, chiamare i parteci- gli automi (precursori dei robo- 

panti sugli stands o addirittura ts) divertono i visitatori, 

prenderli per mano e guidarli a Anno Zero per l’era robotica, 

destinazione. formidabile sfida degli anni 90, 

È la fantasia al servizio del vera democratizzazione dell’in- 

commercio, tendenza nuova formatica, trampolino d’accesso 

colta al balzo dai giganti ameri- al domani. In California, e sulla 

cani come IBM, AMERICAN Costa Est, si confrontano già le 

AIRL1NE, HONEYWELL, HO- ricerche per preparare l’arrivo 

LIDAY ON ICE, PEPS1 COLA, su grande scala di questi urna- 

SONY, ecc. noidi nell’ambito familiare. A 

Anche le stars di Hollywood sud di San Francisco, in uno 
sono contaminate dalla robot- spazio ridotto ed inquinato, lot- 
mania: organizzano ricevimenti tano quotidianamente i ricerca- 
dove robots servono bevande ai tori-affaristi di Silicon Valley (la 
convivi, fanno ridere e buttano valle del silicio, la valle dei 
in acqua quelli che si dimostra- chips). Ma all’orizzonte, spun- 
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tano già i Giapponesi e strana¬ 
mente sfuggono dai laboratori 
di Sunnyvale o di Santa Clara 
informazioni segretissime, sfrut¬ 
tate poi in anteprima in Oriente 
nelle unità di produzione alta¬ 
mente specializzate con mano 
d’opera molto abile che realizza 
questi componenti a un prezzo 
inferiore di tre o quattro volte 
rispetto a quello che sarebbe 
costato in America. 

Dopo di che quanto prodotto 
viene proposto alle stesse azien¬ 
de californiane. In genere, gli 
americani comprano... Anche 
perché i giapponesi hanno la 
miniaturizzazione nel sangue e 
dotano i loro rohots di ricono¬ 
scitori di voce umana molto 
sofisticati. Certi rispondono ad¬ 
dirittura con un linguaggio chia¬ 
ro, senza l’ombra di un lontano 
accento metallico. Tutto ciò a 
prezzi concorrenziali che an¬ 
dranno sempre diminuendo con 
il progresso delle macchine. Già 
sono stati presentati dei mini¬ 
giochi a cristalli liquidi equipag¬ 


giati da riconoscitori di parola, 
elementi fin d’ora riservati ai 
computers professionali e speri¬ 
mentali ed ai micro-computers 
di giochi a grosso ingombro. 
Oramai, una nuova generazione 
di giochi è nata e sostituisce a 
meraviglia bambole, soldati di 
piombo e carri armati diabolici. 
Ma negli uffici di Tokyo, si pre¬ 
para già una nuova famiglia di 
robots (da montare o già mon¬ 
tati) che somiglieranno di più 
agli home-robots made in USA. 
Forte della loro formidabile ca¬ 
pacità di miniaturizzazione e 
realizzazione a bassi costi, l’O¬ 
riente riserva grosse sorprese 
all’Occidente. 

Aspettiamo quindi, come al so¬ 
lito da spettatori passivi, i risul¬ 
tati commerciali dell’aggressivi¬ 
tà dei due mondi super-indu¬ 
strializzati, con la speranza, di 
condividere l’avanzata tecnolo¬ 
gica, anche se con un po’ di 
ritardo. 

Meglio tardi che mai... 


“Mouse” l’interfaccia del futuro 

Nel 1983, nasce la prima “scrivania-schermo” della storia. Files e program¬ 
mi sono rappresentati da simboli ed appaiono nelle apposite “finestre", il 
tutto comandato da un mouse. Questo sistema risponde ad aspettative 
essenziali: oltrepassare i limiti dello schermo per offrire all’utente una visione 
più vasta con l’apporto di uno strumento migliore per la clasificazione del¬ 
l’informazione. 

È possibile lavorare su più file nel contempo ad una velocità notevole. Tali 
sistemi non possono generalizzarsi dall'oggi al domani, ma certamente indi¬ 
cano una direzione, tutti prevedono che il mouse sara probabilmente 1 inter¬ 
faccia dominante nei due prossimi anni a venire. Dopo di che il riconosci¬ 
mento della voce dovrebbe prendere il passo. Le ricerche stanno già avan¬ 
zando verso il riconoscimento diretto dei gesti (movimento dello sguardo, 
della testa...). Saranno capaci di fermarsi, questi.scienziati scatenati? 


Giocate con il vostro corpo 

Anche il gioco “guardie e ladri” è cresciuto. A Dallas, grazie all unione del 
computer e dell'infrarosso, i ragazzi possono giocare sul serio — e non solo 
sullo schermo — a guerre di fantascienza. Questo nuovo tempio del com¬ 
puter si chiama Planet Photon, un vecchio ufficio completamente trasfor¬ 
mato in un luogo futuristico. I "giocatori" indossano caschi e casacche, 
sensibili agli infrarossi, collegate ad un micro-processore posto sul petto che 
gestisce l’azione di ognuno. Un compter centrale segna i punti. Il nervo 
della guerra è il “Phaser”, un'arma innocente (?) che sputa infrarossi. 11 
vantaggio di questo gioco è che non ci sono contestazioni possibili: tutto è 
registrato. Aperto nel 1984, l’inventore, un certo Sig. CARTER, è molto 
contento: il successo è grosso. Nasceranno altre Planet Photon?... Una cosa 
è certa: ha aperto una nuova strada. L'elettronica serve finalmente a gioca¬ 
re con il proprio corpo — e a diventare un eroe. 


Esistono migliaia di altri esempi al quanto interessanti, citarli tutti 
sarebbe impossibile e noioso. L’importante è considerare l’informa¬ 
tica come un’evoluzione positiva e cercare insieme a lei un’armonia 
di vita. 

“Degli attrezzi con un'anima disciplinano gli uomini. Degli uomini 
con un’anima dominano gli attrezzi. Ecco perché c’è bisogno, tra 
loro, di rispetto e di cortesia” ha scritto il giapponese Kenji Ekuan. 


L’idea di partenza è stata basata sul fatto che attualmente la distribuzione, 
nel settore informatico, è anarchica: proliferazione di macchine, informazio¬ 
ne difficile da ottenere, adeguazione attrezzatura-bisogno aleatoria, fornitori 
sparsi un po’ ovunque, perdita di tempo da parte del cliente. Dal punto di 
vista fornitore è sempre difficile colpire l’insieme degli utenti potenziali. A 
questi livelli, vale la pena di pagare un affitto annuo di $ 250 a 350 per mq! 


Un affitto di 350 dollari per m 2 

In America, a Dallas, è stato realizzato il primo mercato permanente dell’in¬ 
formatica professionale “INFOMART ’ inaugurato il 23 Gennaio 1985. Alla 
base di questo spettacolare progetto, due big boss: Trammel CROW e Bill 
WINSOR. Il palazzo offre 160 000 mq di superficie su piani di 13.000 mq. 
L'architetto. Martin GROWALD, si è sipirato al Crystal Palace di Londra 
(distrutto nel 1880), un edificio trasparente che non da ai visitatore un’im¬ 
pressione di opacità o di complicazione. 120 fornitori sono presenti in per¬ 
manenza. Il cliente (i soli utenti professionali) è accolto dall’equipe di IN- 
FORMAT che lo orienta in funzione dei suoi bisogni. 
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LE COSE DA SAPERE PRIMA DELL’ACQUISTO 


COME SCEGLIERE IL COMPUTER 


di Claudio Santucci 


ROM , RAM , memorie di schermo , editing e così via... 

E meglio acquistare un MSX, un Commodore , un Texas o un Sega? 
Come regolarsi? Di che cosa si deve tenere conto quando si compra 

un computer? 



La scelta di un Personal è diventata, ormai, la scelta di un vero e 
proprio “Personal System” ritagliato su misura secondo le particolari 
esigenze dell’utente. L’unità centrale, le periferiche e gli altri supporti 
diventano un insieme da armonizzare al meglio per ottenere ottime 
performances. 

I DUBBI 

Sì, siamo d’accordo, è il caso di acquistare un Computer ma come 
scegliere, dove andare, come interpretare i dati che troviamo sui de- 
jdiants o che ci vengono forniti dal venditore? 

E un problema. Un Computer, non è televisore a colori o una radio 
stereo, oggetti ormai di dominio pubblico e dove tutti, chi più chi meno, 
siamo in grado di “mettere bocca”. 

Qui si parla di cose molto diverse, si parla di ROM, di RAM, di Memo¬ 
rie di schermo, di Editing e così via. Come regolarsi? Vediamo di ri¬ 
spondere proprio, a domande come queste, per farvi sentire meno spae¬ 


sati in questo “nuovo mondo”, dove, ancora, molte persone si orientano 
con molte difficoltà. 

LE PAROLE MISTERIOSE 

L’informatica, come tutte le altre attività specialistiche, è caratterizzata 
da un “gergo” fatto di termini precisi che spesso appaiono misteriosi ed 
incomprensibili a chi non è addetto ai lavori. Nonostante la grande 
diffusione dei Personal Computers, ancora oggi moltissime persone fan¬ 
no fatica a comprendere alcuni dei termini più importanti che servono a 
descrivere le caratteristiche salienti di una certa macchina (intendiamo 
per macchina un computer, naturalmente). 

Si sa, il mondo dell’elettronica è un mondo che viaggia ad alta velocità 
ed il linguaggio che si adopera è di conseguenza, rapido, stringato ed 
essenziale. Ecco così spiegato tutto un proliferare di sigle ed abbrevia¬ 
zioni che servono ad elencare in maniera univoca e chiara le qualità di 
un elaboratore. 

Ma chiare per chi? Per un programmatore o per un costruttore o co¬ 
munque, per uno del “giro”? Niente paura le cose importanti da sapere 
per scegliere bene non sono poi molte ed i termini legati a queste carat¬ 
teristiche sono meno di una decina. 

Quando si entra in una concessionaria di automobili, il venditore ci 
propina una serie di 60 CV, 5 porte, 5 marce di serie, optional vari, 
vetri atermici, 150 km/h, 20 chilometri con un litro ecc. L’automobile 
viene scomposta, cioè, in una serie di dati e di cifre che oramai fanno 
parte della vita quotidiana, eppure, tra questi c’è il sottoscritto, sono 
pochi quelli che su due piedi saprebbero dare la definizione di Cavallo 
Vapore. Qualcuno potrebbe pensare che si tratti di un equino ai bagni 
turchi! 

Tutto questo, comunque, non ha impedito la diffusione, nei termini che 
conosciamo, di questo mezzo di trasporto. Eppure, più o meno, capita 
la stessa cosa anche al Sig. Rossi che entra e chiede informazioni sulle 
caratteristiche di un computer. Il nostro, viene investito da una serie di: 
“questo personal ha 64 K di RAM e 32 di ROM, ha una risoluzione di 
320 x 200, il BASIC è del tipo Microsoft, più o meno esteso, il suo 
sistema operativo è l’eccellente CP/M” etc. etc. 

Ma cosa sono e rappresentano questi termini che possono sembrare i 
nomi di protagonisti di fiabesche avventure? 

QUELLI CHE CONTANO: K (KB) 

Con K (KB) si indica la quantità di istruzioni e di dati che è possibile 
immettere nel computer prima di saturare la parte di memoria riservata 
a questo compito. 

1 K corrisponde a 1024 Bytes. Un Byte sarebbe un carattere, una varia¬ 
bile che si introduce nel computer. Per esempio digitare la lettera “A” 
significa occupare un byte nella memoria (per maggiori dettagli sulla 
struttura del byte, si consiglia di leggere l’articolo dedicato a questo 
argomento nella rubrica “Le Parole Difficili”). 

Dire che un computer ha, per esempio, 64 K di memoria significa che a 
disposizione dell’utente ci sono fino a 65.536 Bytes da poter immettere 
in uno stesso programma. Se si parla di ROM i K stanno ad indicare lo 
spazio che il sistema operativo si riserva nella memoria del computer è 
che, virtualmente, non è a disposizione dell’utente. 

Per cui, più grande è il numero di K e maggiore è la memoria a disposi- 
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zione di chi programma e, quindi, sarà possibile immettere un numero 
maggiore di istruzioni e di dati per creare programmi sempre più inte¬ 
ressanti e complicati. Da questo punto di vista esistono due possibilità. 
Alcuni costruttori preferiscono creare sistemi dalle caratteristiche fisse 
come, per esempio per il Commodore 64, mentre altri forniscono la 
possibilità di espandere la memoria a disposizione come per il SEGA 
Se 3000 che può quasi raddoppiare le sue capacità, come pure il nuovo 
nato in casa Commodore, il C 128. 

ROM 

Ecco una delle tante sigle. È l’abbreviazione delle parole inglesi “Read 
Only Memory” cioè memoria a sola lettura. Corrisponde, cioè a quella 
porzione della memoria cui si può accedere per vedere cosa c’è, ma che 
non può essere manipolata come quella a disposizione dell’utente, per 
quanto riguarda, almeno, l’immissione di dati e variabili. In questa 
porzione risiede il sistema operativo che presiede al corretto funziona¬ 
mento della macchina e alla giusta interpretazione dei dati che vi ven¬ 
gono immessi, segnalando che non vengano mai superati gli standard 
di linguaggio e di grandezze previsti per la macchina in questione. 

È un po’ la sala di controllo e di smistamento di tutto il sistema. In 
questa parte risiede, anche, l’interprete che traduce le istruzioni immes¬ 
se, che sono in BASIC di solito, nel vero linguaggio compreso dalla 
macchina. Questa locazione, al di fuori della portata dell’utente, garan¬ 
tisce da manipolazioni accidentali che porterebbero ad una errata inter¬ 
pretazione dei dati se non al blocco dell’esecuzione del programma. 
Questi K possono essere, quindi, scarsamente utilizzati dall’utente e 
una delle preoccupazioni dei costruttori è quella di ridurre al minimo 
possibile queste aree di memoria per mettere a nostra disposizione il 
maggior numero di K possibili. 

RAM 

Altra sigla: RAM corrisponde a “Random Access Memory” ovvero, me¬ 
moria ad accesso casuale. E la porzione di memoria a disposizione di 
chi programma, dove, di norma, vengono “allocati” i programmi scritti 
da noi o caricati dalle periferiche preposte a questo compito. 
Immaginiamola, la RAM, come una lavagna pulita, dove di volta in 
volta, scriviamo i nostri programmi e che possiamo, è ovvio, cancella¬ 
re, ripulire totalmente o parzialmente per fare spazio a nuove istruzioni 
o modificare parti di programma. Allo spegnimento della macchina, a 
differenza della ROM, tutti i contenuti della RAM vengono cancellati e, 
se non si è provveduto a salvarli, si perdono. 

La quantità di K della RAM starà ad indicare lo spazio che abbiamo a 
disposizione per i nostri programmi, per cui, un numero elevato di K 
deve essere sempre interpretato come un dato positivo. 

IL MICROPROCESSORE (CPU) 

La CPU, dall’Inglese “Central Processing Unit” ovvero Unità Centrale 
di Elaborazione, è il cuore di un Personal Computer. Funzioni di memo¬ 
ria temporanea e di elaborazione sia logica che aritmetica. 

Questo piccolo pezzetto di silicio ha permesso la “rivoluzione” dei per¬ 
sonal in termini di diffusione e di riduzione dei costi. All’interno di que¬ 
sta struttura sono installati registri che svolgono funzioni di: 

— Controllo, fondamentale per la sincronia delle varie componenti il 
sistema. 

— Elaborazione aritmetico/logica. 

— Memorizzazione o prelievo di dati dalla memoria o dalle periferiche. 
Un microprocessore, per quanto raffinato voglia essere è in grado di 
elaborare solo una cosa alla volta. Diventa decisiva, così, la velocità 
con cui compie questa operazione. Il ritmo di lavoro viene scandito 
dall’orologio del sistema (clock), ed i tempi impiegati si esprimono in 
“cicli di clock”, e cioè in MHz (megaHertz) impiegati per trattare un 
dato. Minore sarà questo valore e più rapida risulterà l’elaborazione del 
dato in questione. 

Molto dipenderà, però, oltre che dalla velocità del processore, dalla 
struttura delle “vie di trasporto” per i dati, poiché sappiamo che esisto¬ 
no processori di varia grandezza che possono trattare “parole” a 8-16- 
32 bits. 

LE PERIFERICHE 

Sono dispositivi esterni che servono per visualizzare o memorizzare i 
dati che il computer elabora, e che vengono controllati dall’utente. La 
periferica principale è proprio la tastiera. Da qui passa la maggior parte 


delle informazioni che la macchina deve elaborare. 

Sulla tastiera, oltre alle lettere dell’alfabeto e le cifre, è possibile trovare 
alcuni caratteri semi-grafici. Sono presenti, inoltre, dei testi che riassu¬ 
mono determinate funzioni e che sono di aiuto nella programmazione (i 
tasti Help ad esempio), o, addirittura, tasti da programmare secondo le 
esigenze (tasti funzione FI, F2, F3...). 

E chiaro che più ricca sarà la tastiera e più agevole risulterà il compito 
di chi opera. 

Molto importante risulta, parlando sempre di tastiera, la facilità di ge¬ 
stione dello schermo, e cioè il cosiddetto “Editing”. E molto importante 
poter intervenire sulle linee di programma per apportare correzioni sen¬ 
za ricorrere a macchinose sequenze, e poter disporre dei movimenti del 
cursore in maniera rapida ed immediata. Da questo punto di vista l’edi¬ 
ting di casa Commodore è uno dei più potenti e facili da usare, mentre 
risulta un po’ laborioso quello dell’Atari. 

IL REGISTRATORE 

In ordine di popolarità e di convenienza troviamo il registratore a cas¬ 
sette. E la periferica più a buon mercato. Il registratore utilizza delle 
normali cassette, reperibili in qualsiasi negozio che venda radio e man¬ 
gianastri. La cassetta consente di immagazzinare una mole enorme di 
dati, ma per la particolare struttura dei dati che si archiviano su questo 
supporto, risulta un po’ lento in fase di ricerca e di caricamento del 
programma. E possibile, comunque, con particolari accorgimenti ren¬ 
dere più efficiente la gestione dei dati con questa periferica. Per esem¬ 
pio, si può far “leggere” l’intero file della RAM, e poi passarlo su nastro. 
In questo modo si rendono possibili manipolazioni degli archivi, altri¬ 
menti impossibili per dei dati sequenziali. Tutto dipende dalla quantità 
di RAM disponibile. 

La velocità di registrazione dipende principalmente dalla velocità con 
cui lavora la CPU della macchina. 

Niente paura, comunque, sono da un pezzo in circolazione programmi 
che servono proprio a “dinamizzare” la gestione di questa periferica. 
Due note caratteristiche. Lo SHARP MZ 700 ha il registratore incorpo¬ 
rato nel blocco della tastiera, questo può far risparmiare spazio e riduce 
il “flokloristico” intreccio di cavi che distingue il piano di lavoro dell’ap¬ 
passionato di computer. Una parte del software dell’ATARI 800 XL, per 
intrattenere l’utente durante le fasi di caricamento può far suonare delle 
dolci musichette. 

IL DISK DRIVE 

Il Disk-drive è il passo obbligato per quell’utente che riesce o vuole 
approfondire la conoscenza e il trattamento di un Personal Computer. Il 
suo costo, spesso, raggiunge quello della stessa Consolle centrale, ma 
ripaga in termini di velocità e di precisione. Questo strumento, inoltre, 
permette diversi tipi di trattamento dello stesso dato e mette a disposi¬ 
zione una ricerca “mirata” del dato in esame. Il Drive usa dei dischetti o 
“Floppy-Disk” reperibili, oramai, a prezzi accessibili anche per la più 
“esausta” delle tasche. I dati da tenere in maggior considerazione al 
momento dell’acquisto di un drive sono: 


— Quantità di bytes registrabili su di un dischetto. 

— Quantità di programmi inseribili in una singola facciata. 

— Presenza o meno di una propria RAM di memoria che 
consente, se presente, di aumentare il volume di traffico in 
entrata e in uscita. Questa particolarità renderebbe il drive 
una vera e propria periferica intelligente. 

— Velocità di registrazione e di ricerca. Un dato molto im¬ 
portante su cui prendere informazioni. 


I disk drive non usano, tutti, dischetti dello stesso formato. Il più popo¬ 
lare è rappresentato da dischetti di 5 pollici ed 1/4. Ma ne esistono 
anche di più grandi, ma qui non siamo più nel pianeta “Home compu¬ 
ter”, o di più piccoli, come il micro drive della Sinclair. 

LA STAMPANTE 

La stampante rappresenta una periferica di tipo più specialistico. Lo 
stesso discorso vale per il Plotter che stampa disegni e grafici anche ad 
alta risoluzione e a diversi colori. Abbiamo detto specialistico, ma non 
certo per particolari difficoltà nel loro utilizzo, quanto perché non tutti 
hanno bisogno di stampare testi e disegni in grande quantità. 
Sembrano, quindi, essere delle periferiche indirizzate maggiormente 




























































































































































































































































































































verso l’acquisto per motivi di lavoro, ma grazie ad un sensibile abbassa¬ 
mento dei costi che da “salati” sono passati a “saporiti”, le stampanti 
ed i plotter godono di un certo successo in termini di vendite. La tecno¬ 
logia di costruzione di questa periferica ha raggiunto livelli notevoli, 
negli ultimi anni. La stampa dei dati viene effettuata secondo tecniche 
differenti, esistono quindi diversi tipi di stampante, e di qualità di stam¬ 
pa. La migliore qualità si ottiene con la stampante a “matrice di punti” 
che consente di gestire più agevolmente eventuali capacità grafiche. 
Anche qui elenchiamo alcuni fattori importanti da prendere in conside¬ 
razione al momento dell’acquisto: 


— Nel caso della stampante la qualità, anche se costa un 
po’, è decisiva. 

— Velocità di stampa. Una prestazione accettabile si attesta 
intorno agli 80 caratteri al secondo. 

— Capacità della stampante di scrivere in tutte e due le 
direzioni. Verificare, cioè se la stampa è bidirezionale o 
meno. 

— Rumorosità ed ingombro. 

— Uso dei moduli continui o di fogli singoli. 

— Possibilità di stampare grafici ad alta risoluzione. 

— Numero di colonne stampabili. Decisivo se l’uso principa¬ 
le è la stampa di testi o resoconti. 

— Qualità della stampa. Abbiamo detto prima della più ele¬ 
vata qualità delle “Margherite” e delle “Quality-letter”. 

— Possibilità di stampare caratteri creati dall’utente per ar¬ 
ricchire il set messo a disposizione dalla casa. 


IL MONITOR 

Il Monitor è, molto spesso, il pezzo più costoso di questi accessori. Per 
un normale utilizzo del computer può essere sufficiente la risoluzione 
che ci fornisce un normale apparecchio televisivo. Per ottenere, comun¬ 
que certe prestazioni, in termini di assoluta nitidezza e precisione e di 
maggiore risoluzione, uno strumento come il Monitor diventa indispen¬ 
sabile. La gamma di possibilità offerta dal mercato è vasta e adatta a 
tutti. I monitor possono essere monocromatici (l’equivalente di un TV in 
bianco e nero), o a colori. A seconda delle caratteristiche della macchi¬ 
na, possono essere acqustati dei monitor che hanno le possibilità di 
selezionare lo schermo a 40 o a 80 colonne. 

Questa caratteristica si rende necessaria, ad esempio, se si vuole visua¬ 
lizzare l’alta risoluzione del “Modo 128” del Commodore 128. La carat¬ 
teristica che rende ottimo un monitor è il numero di punti o “Pixels” che 
si possono “accendere” e che “fa” la nitidezza deH’immagine. 

Anche qui il prezzo è legato alla qualità dell’immagine, per cui se pote¬ 
te, aspettate di avere qualche soldo di più in tasca e fare una spesa una 
volta per tutte, piuttosto che comperare un prodotto che è sicuramente 
economico, ma che poi vi può costringere ad una spesa ulteriore, una 
volta che siano aumentate le vostre esigenze di qualità e nitidezza del¬ 
l’immagine. 

Anche se al momento non dovesse servirvi, è bene, considerare la pos¬ 
sibilità di un suo eventuale collegamento al vostro Personal, in vista di 
impegni futuri che non sempre è possibile prevedere. 

Esistono altre apparecchiature che interessano fasce più ristrette di 
utenza date le loro specifiche applicazioni. Parliamo, ad esempio del 
Modem che consente la comunicazione tra due computer via telefono. 
Il dato di fondo, da tenere in considerazione, al momento della scelta, è 
la capacità, (di un determinato modello) di espandersi e connettersi con 
diverse apparecchiature. Un sistema flessibile e che si può arricchire di 
molte componenti, consentirà all’utente l’uso migliore in tutte le situa¬ 
zioni. 

IL LINGUAGGIO 

I Personal Computer, oramai, sono costruiti con l’interprete BASIC già 
inserito nel Sistema operativo. Di questo linguaggio ne esistono svaria¬ 
te versioni tutte efficaci e potenti. 

Alcuni costruttori preferiscono seguire la linea del linguaggio comune a 
tutti i modelli in commercio. Come ad esempio la Sharp o l’Atari. Altre 
case, tipico esempio è la Commodore, hanno costruito i vari modelli 
con diversi “dialetti” del BASIC, come il 3.5 del C16 ed il 2.0 del C64. 
Ma, anche in questo caso, le differenze non sono poi molte e l’adatta¬ 


mento al nuovo “dialetto” non richiede molto tempo, vista anche l’enor¬ 
me disponibilità di programmi esistenti per queste macchine. 
Nell’arcipelago dei linguaggi un discorso a parte merita il BASIC MSX. 
Questo linguaggio è stato sviluppato dalla Microsoft ed una macchina 
programmata con tale versione ha la caratteristica di essere totalmente 
compatibile con una qualsiasi altra avente lo stesso standard. 

I sistemi MSX dato il comune standard di costruzione hanno permesso 
una notevole riduzione dei costi che, secondo gli esperti, è appena all’i¬ 
nizio. Tutte le macchine MSX hanno, quindi, la possibilità di scambiar¬ 
si programmi indipendentemente dalla marca. 

Se si riuscirà a migliorare la tecnologia di costruzione, ed in questa 
direzione sono in arrivo delle vere e proprie “novità bomba”, il sistema 
MSX, per la compatibilità, per i suoi bassi costi e per la grande disponi¬ 
bilità di software è destinato ad essere il sistema del futuro, quello che 
trasformerà il computer da oggetto misterioso a, quasi, un elettrodome¬ 
stico nella vita di tutti i giorni. 

Alcuni computer hanno la possibilità di gestire le informazioni con l’au¬ 
silio di “Sistemi operativi”, programmi che consentono un utilizzo più 
razionale e potente delle possibilità della macchina. 

Uno dei più diffusi e potenti è il CP/M nelle sue varie versioni: 3.0, 2.0 
ecc. 


LINGUAGGIO E SISTEMA OPERATIVO 

I linguaggi di programmazione pur avendo una storia breve 
alle loro spalle, già hanno raggiunto un elevato livello di 
capacità e di specializzazione. 

La loro funzione è quella di rendere più compatibile il dialo¬ 
go con la macchina. La struttura di un linguaggio è formata 
da una serie di parole “chiave” che servono a far eseguire 
alla macchina determinate funzioni. 

Queste parole sono, per la maggior parte, in Inglese che è la 
lingua per eccellenza delle comunicazioni scientifiche e com¬ 
merciali. Tuttavia si tratta di parole di facile comprensione e 
non rappresenterà un problema il loro utilizzo. 

II computer, in una fase successiva, tradurrà nel “suo” lin¬ 
guaggio le parole immesse, compie l’operazione idonea e fa 
l’operazione inversa per rendere più comprensibile all’utente 
il risultato di quella determinata elaborazione. 

La stesura di linguaggi di programmazione è stata fatta te¬ 
nendo conto del tipo di problema da risolvere, e così sono 
nati linguaggi adatti alla risoluzione di problemi scientifici 
come il FORTH ed il PASCAL o orientati verso argomenti di 
tipo commerciale come il COBOL. Il BASIC è il linguaggio 
che ha incontrato il maggior successo di pubblico, a causa 
della sua facile comprensione e della elasticità che mostra 
nelle varie situazioni d’impiego. 

Un sistema operativo è fatto di una serie di istruzioni e co¬ 
mandi che rendono più veloce e potente la gestione delle 
varie componenti il computer, tipo la memoria, la stampa, il 
drive ecc. Con il sistema operativo non è possibile program¬ 
mare “finemente” il computer. Il suo set di istruzioni rende 
più razionale la gestione delle varie strutture operative. 


LE CONCLUSIONI 

Speriamo, adesso, che non abbiate le idee più confuse di prima, da 
parte nostra c’è stato tutto l’impegno per fare un po’ d’ordine nella 
situazione. 

La scelta di un “Home o Personal Computer” rimane sempre una cosa 
da ponderare con attenzione, ma abbiamo visto che le cose essenziali 
da sapere non sono poi un’infinità e la loro difficoltà è spesso virtuale 
più che reale. 






























































































































































































































































































































LE COSE DA SAPERE PRIMA DELL’ACQUISTO 



Non abbiamo accennato ai prezzi per un semplice motivo. Le case, è 
vero, forniscono dei listini molto precisi, ma è anche vero che ogni 
negozio ha la sua offerta speciale o di lancio, per quel determinato 
prodotto. 

Conviene, quindi, per non fare torto a chi vende e per non dare a chi 
compra delle notizie poco attendibili, armarsi di un po’ di pazienza e 
girare diversi rivenditori, fino a che non si è trovata la combinazione 
che ci “calza” meglio. 

Un’ultima cosa: per evitare malintesi e spiacevoli discussioni chiedete 
di “accendere” il computer all’interno del negozio e provarne il funzio¬ 
namento. Con questo sistema sarete tutti più tranquilli; chi vende 
eviterà ogni possibile contestazione e chi compra sarà sicuro di non 
aver acquistato a scatola chiusa. 

Non ci resta che augurarvi “buon acquisto” e darvi il benvenuto in 
questa sempre più numerosa famiglia di appassionati “computoma- 
ni”. 


LE COSE IMPORTANTI PER 
VALUTARE UN COMPUTER 

— Capacità della Memoria. 

— Possibilità di espansioni di Memoria. 

— Facilità di uso delle varie componenti. 

— Possibilità di aggiungere altre periferiche. 

— Completezza e Potenza dei linguaggi utilizzati. 

— Quantità e qualità del software in commercio. 

— Compatibilità con altri sistemi. 

— Dimensione e qualità della rete di assistenza. 

— Velocità necessaria per elaborare un dato. 

— Prezzi, ma quello lo vedrete con i vostri occhi. 

— Sistema operativo potente e diffuso. 

— Tastiera completa e facile da usare.. 


PER LA SCELTA DEL VOSTRO COMPUTER TENETE 
CONTO DI QUESTA TABELLA 



SCARSO 

SUFFICIENTE 

BUONO 

OTTIMO 

RAM 

12 K 

28 K 

64 K 

64 K 

ROM 

48 K 

32 K 

20 K 

4 K 

Velocità 

1 MHz 

2 MHz 

3 MHz 

4 MHz 

STAMP 

60 cps 

60 cps 

80 cps 

80 cps 

Periferiche 

solo 

registratore 

registratore + 
drive + 
stampante 

registratore + 
drive + stamp. 

+ monitor + 
plotter 

registratore + 
drive + stamp. 

+ monitor + 
plotter (tutti 
con più di un 
modello) 


LA VERSATILITÀ DEI SISTEMI PIÙ VENDUTI 


MODELLO 

COLLEGAMENTI 

PERIFERICHE (opz.) 

Commodore 16 

Porta utente e seriale 

Slot per cartucce ROM • 

2 porte per Joysticks 

Uscita video composita 
Uscita RF e per la Tv 
Uscita audio 

Disk Drive 1541 

Registratore 1531 

Stampante MCS 801 
Stampanti MPS 802/3 

Plotter 1520 

Monitor 1702 

Commodore 64 

Porta utente 

Uscita per monitor 

Uscita RF per Tv 

Uscita seriale 

Stampanti 801, 802, 803 
Plotter 1520 

Disk Drive 1541 

Monitor colore 1701 

Commodore 128 

Porta utente 

2 porte Joysticks 

Porta seriale 

Uscita video composita 
Uscita video RGB1 

Uscita RF per la TV 

Uscita Audio 

Uscita per espansioni 

Compatibile con tutte 
le altre periferiche 
Commodore con 
raggiunta delle no¬ 
vità del nuovo 

Disk Drive 1571 e 
del monitor 1901 a 
colori e del mouse 1350 

Spectrum Plus 

Porta espansione 

Uscita RF per TV 

Uscita registratore 

Microdrive 

Trickstick 

Atari 800 XL 

Uscita RF per TV 

Porta per cartucce 

Porta I/O 

2 porte per Joysticks 
Connessione periferiche 

Registratore 1010 

Disk drive 1050 

Stampante 1027 

Plotter 1020 

Touch Tablet 

Philips 8010 

Uscita RF per TV 

Uscita monitor 

Uscita registratore 

2 porte per Joysticks 

2 porte per cartucce 

Monitor BM 7552/DDC 
Stampante VW 0010 
Stampante VW 0020 

Registr. D6000/60P 

Disk drive 

Sharp MZ 700 

Uscita monitor RGB 

Uscita video composita 

2 porte per Joysticks 

Uscita per stampante 

Uscita per altro 
registratore 

Il plotter ed il re¬ 
gistratore sono in¬ 
corporati insieme al¬ 
la tastiera. Le peri¬ 
feriche che si pos¬ 
sono aggiungere so¬ 
no: la stampante MZ 

80 P5, ed i monitor 

MZ 1104 e MZ 1005. 

Sega SC 3000 

Connettore audio 

2 porte per Joysticks 

Porta per espansioni 

Disk Drive SF 7000 
Registratore SC 300 

Plotter SP 400 A 

Sony 501 P 

Uscita video Composita 
Uscita RF per la TV 

Uscita Parallelo TTL 

2 Porte cartucce 

2 porte Joysticks 

Sono previste tutte 
le periferiche com¬ 
patibili con lo stan¬ 
dard MSX. 11 regis¬ 
tratore è incorpo¬ 
rato alla tastiera. 

Toshiba HX 10 

Uscita audio 

Porta cartucce 

2 porte per Joysticks 

Uscita RF per TV 

Uscita video composita 
Uscita per stampante 

Stampante HX P 550 
Registratore HX P 570 

Disk drive 


IL PROCESSORE E IL “DIALETTO” 

LE CARATTERISTICHE DI MEMORIA DI ALCUNE MACCHINE LA VELOCITÀ DI ELABORAZIONE BASIC IMPIEGA TO 


MODELLO 

ROM 

RAM 

ESPANDIBILITÀ 

MICROPROCESSORE 

VELOCITÀ 

LINGUAGGIO 

COMMODORE 16 

32 K 

16 K 

— 

7501 

0.89/1.76 MHz 

BASIC Versione 3.5 

COMMODORE 64 

20 K 

64 K 

— 

6510 comp. 6502 

1 MHz 

BASIC Versione 2.0 

COMMODORE 128 

48 K 

128 K 

512 K 

8502 

1/2 MHz 

BASIC Versioni 2.0 e 7.0 

SHARP MZ 700 

4 K 

64 K 

_ 

Z-80 A 

4 MHz 

BASIC Sharp 

SEGA SC 3000 

da 8 a 48 K 

da 18 a 32 K 

M.V. 16 K 

Z-80 A 

4 MHz 

BASIC 

SPECTRUM PLUS 

16 K 

48 K 

— 

Z-80 A 

4 MHz 

BASIC Sinclair 

ATARI 800 XL 

24 K 

64 K 

— 

6502 C 

1.79 MHz 

BASIC Atari 

PHILIPS 8010 (MSX) 

32 K 

32 K 

RAM 96 K 

Z-80 A 

3.6 MHz 

BASIC MSX 

SONY 501 P (MSX) 

32 K 

64 K 

Memoria Video 16K 

Z-80 A 

3.6 MHz 

BASIC MSX 

TOSHIBA HX10 (MSX) 

32 K 

29 K 

M.V. 16 K 

Z-80 A 

3.6 MHz 

BASIC MSX 
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La prima volta che lo avevamo notato, è 
stato in occasione del SIM 1985, in uno 
stand caratterizzato dalla presenza di due 
manichini equipaggiati del Walkman ver¬ 
sione “sub”, sistemati sotto una perenne 
doccia a dimostrazione del fatto che i pro¬ 
dotti Sony funzionano sempre. Lo aveva¬ 
mo subito notato per il suo aspetto molto 
professionale e per il design, come sem¬ 
pre nella tradizione della casa madre, 
molto curato. Ci era subito piaciuto, ed 
“arraffati” alcuni depliants informativi, 
eravamo tornati a casa con il desiderio di 
riceverlo in visione per una prova sulle pa¬ 
gine di LIST. 

Da quel lontano Settembre sono stati in¬ 
numerevoli i telex e le telefonate scam¬ 
biate tra la nostra redazione e la sezione 
che si occupa delle pubbliche relazioni in 
casa Sony. Finalmente, subito prima del¬ 
le scorse Festività Natalizie ricevemmo 
un telex di risposta ad uno dei nostri ar¬ 
mai abituali tentativi, in cui ci avvertivano 
che il modello richiesto era temporanea¬ 
mente occupato per il Motor Show di Bo¬ 
logna; a manifestazione conclusa, avreb¬ 
bero provveduto ad effettuare la spedi¬ 
zione dei materiali richiesti... 

In breve, se non avessimo organizzato 
una specie di spedizione “punitiva” nel 
Gennaio di questo 1986, probabilmente 
non avremmo mai ricevuto questo esem¬ 
plare del Sony MSX 2 denominato Hit Bit 
F 500 P. 


_ IL DESIGN _ 

L’HIT BIT F 500 P (HIT significa Home 
Intelligent Terminal), ha sicuramente un 
design che definire esteticamente ed er¬ 
gonomicamente valido, è ben poca cosa. 
La tastiera è separata dall’unità centrale 
su cui trova posto anche un microdisk 
drive da 3,5. 


LA TASTIERA 

Una ottantina di tasti, comprendenti an¬ 
che un tastierino numerico separato con 
dimensioni e posizioni quasi da sistema 
personal, non sono le uniche caratteristi¬ 
che degne di nota di questo “pezzo”. Il 
colore grigio molto chiaro del contenitore 
mette in risalto il bianco della tastiera 
QWERTY ed il grigio più scuro dei tasti 
di sistema presenti su tutti i computers 
MSX. Sulla destra i tasti cursore ben di¬ 
mensionati, e subito sotto il pad numeri¬ 
co i tasti corrispondenti alle quattro ope¬ 
razioni ed alla notazione decimale. Sem¬ 
pre a destra, il cavo a 14 contatti, lungo 
circa un metro, per il collegamento all’u¬ 
nità centrale. 


_ L’UNITÀ CENTRALE _ 

Una volta estratto il computer dalla con¬ 
fezione, se non si collega la tastiera e se 
ci si sofferma alle prime impressioni, è 



Costruttore: 

SONY CORP. 

7-35 KITASHINAGAWA, 
6-CHOME 

141 SHINAGAWA - KU 
TOKYO 

Distributore: 

SONY ITALIA S.p.A. 

V. F.lli Gracchi 30 

20092 Cinisello B. (MI) 
Tel.: 02/6171241 

6121551 

Prezzo: 

L. 1.600.000 


facile scambiare l’unità centrale con una 
diversa apparecchiatura, ad esempio un 
videoregistratore. 

La qualità delle rifiniture è, nel classico 
stile Sony, molto accurata ed elegante. 
Nella parte anteriore del parallelepipedo, 
le cui dimensioni sono paragonabili a 
quelle di un amplificatore Hi-Fi, trovano 
posto due fessure coperte da uno spor¬ 
tellino rientrante, per l’inserimento di car¬ 
tucce di espansione ed I/O ed un drive 
per dischetti doppia faccia da 3,5 pollici. 
In alto a sinistra, un tasto verde pone in 
posizione di attesa (Stand By) il sistema. 
In realtà si tratta di un vero e proprio in¬ 
terruttore di alimentazione, ma probabil¬ 
mente la Sony ha preferito denominarlo 
con la dicitura indicata, per il fatto che 
l’interruttore non disconnette entrambi i 
terminali della linea di alimentazione, ma 
uno solo. I due sportellini per le cartucce 
sono sormontati da una specie di sche¬ 
ma a blocchi, in cui sono evidenziate le 
caratteristiche principali del sistema e 
dal simbolo distintivo dello standard 
MSX, seguito questa volta dal numero 2. 
Nella parte centrale, sotto gli slot di 
espansione, trova posto un comodo pul¬ 
sante di RESET, dimostratosi molto utile 
in più di una occasione; a destra di que¬ 
sto pulsante sono ubicati i connettori per 
due joystick (normalmente ricoperti da 
due “tappi” in materiale plastico), ed il 
connettore dalla insolita piedinatura per 
il collegamento della tastiera. Il drive pre¬ 
senta il pulsante di EJECT per il dischet¬ 
to e la solita spia verde indicante il fun¬ 
zionamento. Su di essa la dicitura HOME 
COMPUTER HB - F500P sembra quasi 
in netto contrasto con le prestazioni che 
già la prima occhiata lascia supporre. 
Per avere la ulteriore conferma di quanto 
si immagina, basta dare un’occhiata al 
pannello posteriore ricco di connettori e 
di prese. 

Cominciando da sinistra verso destra, si 
notano una presa di collegamento ad un 
secondo drive esterno (non necessitante 
di alcuna interfaccia) il connettore DIN 
per il registratore a cassette, un connet¬ 
tore DIN per il collegamento audio/video 
ad un monitor videocomposito, un terzo 
connettóre DIN per il collegamento, gra¬ 



zie ad un cavo fornito in dotazione, a mo¬ 
nitor RGB standard. 


Sempre nello stesso ordine, però nella 
fila sottostante, trovano posto: un terzo 
connettore di espansione I/O, il connetto¬ 
re per stampanti parallele (compatibile 
CENTRONICS), un morsetto serrafili per 
il collegamento a terra dell’apparecchia¬ 
tura (necessario nel caso di collegamenti 
con modem e conseguentemente linee 
telefoniche), il cordone di alimentazione 
a 220 Volt. 


L’INTERNO 

Non abbiamo resistito alla tentazione di 
smontare l’apparecchio inviatoci in visio¬ 
ne, e così dopo una rapida occhiata ai 
contenitori, per individuarne le viti che ne 
tenevano unite le scocche, si è procedu¬ 
to alla rimozione. 

Anche in questo caso abbiamo indagato 
a fondo e separatamente, sia sull’unità 
centrale che sulla tastiera. 

L’unità centrale è sicuramente la parte 
che ci ha riservato più “sorprese”, in 
parte perché non ci aspettavamo che 
fosse così zeppa di componenti, in se¬ 
conda analisi perché abbiamo avuto l’im¬ 
pressione, che non siamo riusciti né a 
confermare né a smentire, che l’esem¬ 
plare mandatoci sia in realtà un allesti¬ 
mento preserie; in definitiva uno di quei 
modelli definiti SAMPLE-NOT FOR SALE 
specialmente approntati per mostre ed 
esposizioni. 

In ogni caso l’interno mostra un allesti¬ 
mento ordinato ed accurato caratterizza¬ 
to dalla presenza di innumerevoli schede 
collegate al circuito generale tramite con¬ 
nettori che per le diverse misure sono 
collegabili, a scanso di errori, esclusiva- 
mente in una sola posizione. 

Su un lato, abbondantemente scherma¬ 
ta, trova posto la sezione di alimentazio¬ 
ne piuttosto ingombrante con un trasfor¬ 
matore ben dimensionato, un dissipatore 
termico su cui sono allogiati due circuiti 
integrati di regolazione delle tensioni di 
alimentazione ed una altrettanto spazio¬ 
sa scheda ospitante il resto dell’elettroni¬ 
ca. 

Si tratta di una scelta da imitare perché 
elimina gran parte dei problemi derivanti 
dalle interferenze prodotte solitamente 
da questa sezione e causa, spessori 
malfunzionamenti del sistema. Sul con¬ 
nettore di alimentazione uscita sono pre¬ 
senti due diversi tipi di tensione: una a 5 
Volt con negativo a massa per l’alimenta¬ 
zione di circuiti TTL, la seconda su due 
rami, a zero centrale, con tensioni nega¬ 
tive e positive di 12 Volt. Il resto dello 
spazio è occupato da un sola grossa 
scheda su cui trovano posto i processori 
tipici di questa seconda versione del- 
l’MSX, le memorie di schermo, RAM e 
ROM, le interfacce-per il collegamento 
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SONY HIT BIT F 500P 


MAPPA DELLA MEMORIA 


BENCHMARK 


BENCH1 

TEMPO 

10.42 

BENCH2 

TEMPO 

30.12 

BENCH3 

TEMPO 

116.14 

BENCH4 

TEMPO 

121.44 

BENCH5 

TEMPO 

24.84 

BENCH6 

TEMPO 

111.58 

PRECIS 

RESULT 

150/150 

PRECIS 

NORMAL 

150/150 



150/105 



150/105 

IONE 1 

RESULT 

OK/OK 

IONE 1 

DECIM. 

0.17/0.25 

DRAWER 

TEMPO 

9.60 

DRAWER 

NOTE 





NOTE 



Leggermente più lento rispetto alla prima versione degli 

MSX. Logicamente la velocità dimi- 

nuisce implementando l’MSX Disk BASIC invece che l’MSX BASIC. Velocita e precisione nei 

limiti dello standard. 






DATA: 4/2/’86 

TIPO MACCHINA: COMPUTER MAT. N° 400928 

Marca: SONY MSX 2 MOD.:HB F500P 



RAM 


della tastiera, del drive e dei vari slot di 
espansione. 

Abbiamo subito notato la differenza dei 
processori impiegati. L’unico ad essere 
rimasto immutato è il classico Z-80A pre¬ 
sente sotto forma di un compatibile pro¬ 
dotto dalla SHARP e contrassegnato dal¬ 
la sigla LH0080A: per il resto sembra tut¬ 
to cambiato. 

Il processore video è di produzione 
YAMAHA e sembra concepito apposita¬ 
mente per lo standard MSX; tale ipotesi 
è ulteriormente confermata dalla presen¬ 
za sul contenitore plastico di un copyri¬ 
ght del 1984 apposto dalla Microsoft e 
dal simbolo distintivo MSX; la sigla di 
identificazione è V9938. 

Un terzo processore Texas Instruments, 
siglato TMS-2793NL dovrebbe svolgere 
le funzioni di interfaccia legate all’uso del 
drive. Una grossa novità presente su 
questo sistema è l’integrazine in un cir¬ 
cuito di dimensioni ridotte, di quella parte 
delle funzioni dello standard affidata in 
passato al processore General Instru¬ 
ments AY-3-8910. Anche in questo caso 
sul contenitore plastico sono presenti i 
marchi distintivi Microsoft ed MSX insie¬ 
me al copyright del 1984; l’integrato di 
produzione YAMAHA è siglato S3527 ed 
assolve le funzioni di generatore sonoro 
ed interfaccia joystick. 

Ispezionando ancora la grossa scheda 
generale si notano due ROM in corri¬ 
spondenza della posizione occupata dal 
drive: in esse sono contenuti il BASIC 
MSX 2 ed il DISK BASIC MSX. Le carat¬ 
teristiche dell’MSX 2 possono essere fa¬ 
cilmente riassunte in due capisaldi: il pri¬ 
mo consiste nella maggiore quantità di 
memoria Video, fissata ad un minimo di 
64K, ma pari a ben 128K nel caso in esa¬ 
me; il secondo punto che contraddistin¬ 
gue l’MSX 2 dai modelli della precedente 
serie è la presenza di un orogolio interno 
con batteria di back-up che viene aggior¬ 
nato in tempo reale. Ciò spiega la pre¬ 
senza di molti più integrati “strani” e di 
incerta interpretazione. Dicevamo che il 
sistema si avvale della presenza di altre 
schede a cui sono lasciate le rimanenti 
funzioni; quella che più salta all’occhio è 


LA GRAFICA MSX 2 

Controllore CRTV9938 
Schermo di 

visualizzazione Visualizzazione di 

caratteri, di grafici e 
area dei bordi. 

Modo Screen Screen 0: 40 caratteri x 
24 righe o 80 caratteri 
x 24 righe 16 colori su 
512 

Screen 1: 32 caratteri x 
24 righe 16 colori su 
512 

Screen 2: 256 punti 
(orizzontali) x 192 
(verticali) 16 colori su 
512 

Screen 3: 64 punti x 
48, 16 colori su 512 
Screen 4: 256 punti x 
192, 16 colori su 512 
Screen 5: 256 punti x 
212, 16 colori su 512, 

4 pagine 

Screen 6: 512 punti x 
212, 4 colori su 512,4 
pagine 

Screen 7: 512 punti x 
212, 16 colori su 512,2 
pagine 

Screen 8: 256 punti x 
212, 256 colori, 2 
pagine 

Stato iniziale: Screen 
0:37 caratteri x 24 
linee 

Fonte di 

caratteri Matrice di 5 x 7 punti/ 

carattere 

Interfaccia di 

uscita Uscita segnale video 

RGB: 0-0,7 V ± 20%, 
75 ohm 

Uscita segnale video 
composito PAL: 

1 V p-p, 75 ohm, sinc. 
negativa 


propria del circuito stampato su cui sono 
montati i vari connettori audio e video e 
su cui a sua volta, con un originale siste¬ 
ma di ancoraggio, è collegata anche una 
seconda piastrina più piccola (di produ¬ 
zione Mitsumi), ed infine la batteria di 
back-up per l’orologio interno. Proprio 
osservando questa scheda abbiamo avu¬ 
to il sentore che l’esemplare oggetto del¬ 
la nostra prova fosse un SAMPLE. 

Le piste del circuito ogni tanto mostrano 
dei tagli e delle giunture, eseguite con 
spezzoni di filo, fatte evidentemente per 
correggere degli errori dello stampato. In 
un caso, particolarmente, si nota un erro¬ 
re tipico dei modelli non perfezionati e 
cioè l’incrocio di due piste corrispondenti 
ad altrettanti piedini di un integrato. 
Un’altra caratteristica che ci ha favore¬ 
volmente impressionato è l’estrema com¬ 
pattezza del drive operante su dischetti 
da 3,5 pollici doppia densità. L’interfac¬ 
cia ne prevede il funzionamento insieme 
ad un secondo esterno, ma grazie ad un 
emulatore se ne può fare tranquillamente 
a meno. Se si è in possesso del drive 
esterno, bisogna far attenzione a colle¬ 
garlo allo speciale slot previsto e contras- 
segnato dalla scritta EXT. DRIVE, evitan¬ 
do di collegarlo con l’interfaccia al terzo 
slot di espansione I/O presente, non abi¬ 
litato a tale funzione. Noi abbiamo colle¬ 
gato il drive Philips provato nello scorso 
numero, e dopo aver commutato il selet¬ 
tore presente sullo stesso ci siamo diver¬ 
titi ad usare alcune funzioni tipiche del 
DISK BASIC MSX con risultati di cui si 
parla in una diversa parte di questo stes¬ 
so articolo. 

Anche la tastiera non è sfuggita all’ope¬ 
razione “Anatomia di un Computer”. 
Dopo aver rimosso la scocca, non con¬ 
tenti, “sadicamente” è stata rimossa an¬ 
che la base metallica ospitante i tasti veri 
e propri; alla fine dell’operazione il gros¬ 
so circuito stampato con i contatti della 
tastiera era alla mercè di colui che, con 
molta pignoleria, ha svolto l’approfondita 
ed attenta indagine sul prodotto presen¬ 
tato. 
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Il Disk Operating System MSX, realizzato dalla Microsoft, 
consente un gran numero di procedure che glj utenti di uria 
qualche forma di DOS conoscono perfettamente Di seguito 
un breve elenco delle istruzioni più conosciute ed usate. 

BA SIC COPY DATE 

DÈL 'DIR FORMAT 

MODE PAUSE REM 

REN (renarne) TIME TYPE 

Una volta, avviato il sistema con la procedura precedente- 
mente descritta, per tornare al DISK BASIC MSX 2, è suffi¬ 
ciente digitare la parola BASIC residente; per operare la 
procedura inversa è invece sufficiente richiamare TMSX- 
DOS con l’istruzione CALL SYSTEM 
Il comando COPY, perfezionato dalla versione 1.06 e suc¬ 
cessive del file GOMMANO COM permette, usando più di 
un drive, o emulandolo via software, la copia di files o del 
contenuto di un intero dischetto. Proprio usando tale siste¬ 
ma abbiamo eseguito il BACK-UP di tutti i programmi MSX 
pubblicati fin qui sulla rivista, in circa 5 minuti (gli utenti 
Commodore, sottoscritto compreso, dovranno dolersi tre¬ 
mendamente ripensando alle estenuanti attese necessarie 
usando il drive 1541 nello stesso tipo di operazioni.). 
Sfruttando l’orologio interno del sistema, aggiornato in tem¬ 
po reale, è possibile aggiornare anche la data di immissione 
dei files di dati su disco; ciò avviene proprio mediante l’istru¬ 
zione DATE contemplata nel set dei DOS. 


Il comando DEL (Delete) cancella i files da disco. 

Il comando DIR visualizza sullo schermo il contenuto della 
Directory, si può scegliere di stampare tutto ciò che appare 
sullo schermò, schiacciando contemporaneamente' i tasti 
CTRL e P; unico neo da noi riscontrato consiste nel dover 
spegnere il computer, dopo aver selezionato tale opzione, 
se si vuole eliminare l’uso della stampante. 

FORMAT divide il dischetto vergine nel rftimero di tracce e 
settori necessario al drive usato. 

Con il comando MODE è possibile selezionare il tipo di vi¬ 
sualizzazione sul monitor (40/60 olonne, schermo grafico/ 
testo, ecc.). 

PÀUSE blocca l’esecuzione di un programma fino alla pres¬ 
sióne di un tasto. 

REM come sempre ha la funzione di nota per l’operatore, 
senza però influire sulla normale esecuzione del program¬ 
ma. 

Se si vuol cambiare il nome di un file è sufficiente usare 
adeguatamente Tistruzine REName. 

Le ultime due istruzioni rimaste resettano Torà esatta e vi¬ 
sualizzano sullo schermo il contenuto, in caratteri ASCII, dei 
files presenti sòl dischetto. 

I comandi non sono certo finiti qui, ma la trattazione appro¬ 
fondita del!'argomento occuperebbe tanto di quello spazio 
dal costringerci a consigliare gli interessati di acquistare o 
consultare qualche' pubblicazione specifica (attualmente il 
panorama in materia sembra essere però piuttòsto limitato). 


A>DATE 

A> 





WRITER 

BAS 

9023 

1-01-84 

Current date ìs Thu 13-02-1986 

A >D IR 





GAL 

BAS 

4895 

1-01-84 

Enter new date: 14-02-1986 

MSXDOS 

SYS 

2432 

23-08-85 

9:29p 

ROMPI 

BAS 

4951 

1-01-84 

AHIMÈ 

COMMAND 

COM 

6656 

2-09-85 

10:10p 

MAZE 


6750 

1-0 ì-04 

Current time is 3:38:48.OOp 

HI-RES 


461 

5-p2-69 

1:37 a 

CHIL 

BIN 

22240 

1-01-84 

Enter new time: i5s40:OOp 

3PRITE 

BAS 

7563 

1-81-84 


SPACE 


6536 

1-01-84 

A>DEL DIANA 

POKER 

BAS 

7259 

f-01-84 


DRAW 

BAS 

6894 

5-02-86 

Nrite protect error writing drive A^ 
Abort, Retry, tgnore? A 

TENNIS 

BAS 

8157 

1-01-É4 


DIANA 


321 

5-02-86 

PIANTA 

H&F500P 

BAS 

11833 

760 

1-01-84 

5-02-86 

3 ! 21 p 

17 

A> 

files 

610304 byte? 

A>BASIC 

RACE 

BAS 

5211 

1-01-84 


A > 





Le informazioni registrate vengono protette da uno “sportellino” in basso a destra sul retro 
del dischetto. Se lo sportellino è in alto, sul dischetto si può registrare; se è in Basèo la 
registrazione à protetta 


L’unità centrale è zeppa di-componenti; si nota in alto la sezione idi alimentazione, piuttosto 
ingombrante e ben dimensionata. 
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SONY HIT BIT F 500P 



Sul frontale (in alto) si notano le tre fessure per l’inserimento di 2 car- Sul retro (in basso) ancora una fessura per una terza cartuccia MSX 
tucce MSX (a sinistra) e per 1 dischetto (a destra). insieme alle altre numerose connessioni (vedi “sistema completo 

Sony”). 


Anche la tastiera mostra una indubbia 
qualità dei materiali e delle parti impiega¬ 
te, ad ulteriore conferma delle "dicerie” 
che hanno permesso alla Sony di poter 
apporre l’etichetta autoadesiva rossa con 


CARATTERISTICHE TECNICHE 

sez. disk drive 

Dischetti 

da 3,5” singola e 
doppia faccia 

Capacità 

Densità 

720 K formattati 

di registrazione 
Suddivisione 

8717 bit/pollice 

del dischetto 

Velocità 

512 bytes/settore 

9 settori/traccia 

80 tracce/lato 

2 lati/dischetto 

di trasferimento 
Tempo di 

250 K/secondo 

accesso medio 
Sistema di 

30 msecondi 

registrazione 

MFM (Mod. di 

Frequenza 

Modificata) 


la frase: “It’s a Sony” sui propri prodotti, 
quasi a riprova dell’originalità e della 
qualità del prodotto finale. 


L’USO 

Lo standard MSX 2 già di per se offre 
molte più possibilità del precedente; se 
poi si dispone di una macchina come 
l’Hit Bit F 500 P, ci si rende conto delle 
enormi possibilità a disposizione di una 
macchina che ostinatamente mette in 
bella mostra l’etichetta home computer: 
una sorta di eccessiva ostentata mode¬ 
stia che mal si addice ad un prodotto di 

pIpqqp 

Il BASIC MSX è molto simile al GW 
BASIC adottato dall’ IBM ; non bisogna 
stupirsene perché artefice della creazio¬ 
ne delle due versioni è sempre la Micro¬ 
soft. La caratteristica principale del BA¬ 
SIC MSX 2 consiste nella maggiore qua¬ 
lità delle istruzioni grafiche; esistono in¬ 
fatti ben 9 formati diversi di schermo: 2 in 
modo testo e 7 in modo grafico. Fino al 
modo 3 le cose sono abbastanza simili al 
precedente standard MSX, ma in realtà 
in modo SCREEN si possono seleziona¬ 
re 40 oppure 80 colonne tramite l’istru¬ 
zione WIDTH, quindi le cose diventano 
più complesse, ma anche molto più inte¬ 
ressanti. 


SCREEN 4 - 256*192 pixels, 16 colori 
scelti tra una tavolozza di 512. 

SCREEN 5 - 512*212 pixels, 16 colori su 
512 - possibilità di usare 4 pagine. 
SCREEN 6 - 512*212 pixels, 4 colori su 
512 - 4 pagine. 

SCREEN 7 - 512*212 pixels, 16 colori su 
512 - 2 pagine. 

SCREEN 8 - 256*212 pixels, 256 colori - 
2 pagine. 

Anche nei modi grafici più semplici, le 
cose sono diventate più interessanti, 
sebbene siano perfettamente compatibili 
con il vecchio MSX. È possibile usare, 
sulla stessa linea, 8 sprites invece che 4; 
altra caratteristica interessante è il poter 
usare un colore diverso per ogni linea di 
pixel dello sprite. 

Altre istruzioni riguardanti la grafica sono 
le caratteristiche istruzioni SET PAGE e 


CARATTERISTICHE TECNICHE 

sez. 

computer 

Clock 

3.58 MHz 

Memoria ROM 

64K (48K BASIC, 


16 K Disk BASIC) 

Memoria RAM 

64 K 

Memoria Video 

128K 
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H ^DWAREmiEW J 



IL SISTEMA COMPLETO SONY 

Connectore RGB da collegare ad un monitor 
a colori per ottenere immagini ad alta 
definizione. 


Possibilità di cojlegamento 
con una stampante come la 
Sony PRN-T24. 



Un drive per floppydisk ; 
consente una veloce e facile 
elaborazione dei dati. Si possono 
usare sia floppydisk a facciata singola 
che floppydisk^ 
a facciata 
doppia. 


MSX-BASIC 
versione 
2.0 incorporato. 


Connettori CONTROLLER per il 
collegamento di uno o due 
joystick rendono più divertenti 
i giochi con il computer 



Possibilità di collega¬ 
mento. con un regi¬ 
stratore come 
l’SDC-500 da 
usare come 
dispositivo 
di memoria 
esterna. 


Possibilità di 
collegamento 
con un apparse 
chio disk drive 
per floppydisk 
come l'HBD-SOW. 


Tastiera separata facile 
da usare. 



La tastiera (in alto) con più di 80 tasti è ultra-sottile. Il drive (in basso) 
smontato, per dischetti a doppia faccia da 3,5 pollici. 


COPY che permettono di suddividere la 
memoria video in un certo numero di pa¬ 
gine decidendo quali di esse visualizza¬ 
re; oppure di copiare parte della memò¬ 
ria video per trasferirla in una diversa 
zona all’interno della stessa. 
All’accensione il sistema controlla che 
gen sia presente un dischetto con un file 
SYS oppure COM, passando automati- 
amente in MSX DISK BASIC, se si tiene 
remuto il tasto SHIFT il sistema selezio¬ 
na il normale BASIC MSX, anche se in 
quésto caso si tratta della versione 2. 
Infine, sé è inserito il dischetto in dotazió¬ 
ne contenente IMSXDOS ed il file 
COMMAND l’interpréte carica il nuovo 
sistema operativo ed i suoi comandi, di¬ 
schiudendo degli orizzonti totalmente im¬ 
pensabili fino a poco tempo fa per un 
utente di home computer. 

L’MSXDOS, scritto anch'esso dalla 
Microsoft, nella versione rilasciata in do- 
taziona al sistema (la 1.03), eguaglia per 
versatilità e potenza anche sistemi ope¬ 
ranti in MS-DOS e CP/M. 

Il set di comandi messo a disposizjone 
del file COMMAND. COM in versione 
111, una delle più avanzate, mette à di¬ 
sposizione dell’utente una serie di utilis¬ 
simi comandi che gli utenti di sistemi ben 
più complessi non mancheranno di rico¬ 
noscere. 


LE NOSTRE IMPRESSIONI 

La nostra valutazione non può essere 
che sostanzialmènte positiva, special- 
mente se si tiene conto delle qualità della 
macchina, ostinatamente classificata 
come home computer. Un appunto è giu¬ 
sto che sia rivolto alla scarsa documenta¬ 
zione che accompagna il computer In 
realtà si ha l’impressione che la docu¬ 
mentazione relativa al BASIC MSX 2 non 
sia ancora pronta; i manuali in dotazione 
sono due guide all’uso del BASIC MSX 
(quello della prima versione), abbastanza 
benfatte, un manualetto plurilingue in cui 
si spiegano i collegmaneti da eseguire e 
le norme elementari di manutenzione 
unitamente alle fondamentali caratteristi¬ 
che tecniche. Non esiste nessuna forma 
di manuale per tutto Òiò che concerne ad 
esempio I MSX-DOS, e questa ci sembra 
veramente una grossa mancanza. Altra 
grossa lacuna del sistema è la totale 
mancanza di un connettore per il collega¬ 
mento ad un normale TV color. Chi non è 
in posseso di un televisore dotato d pre¬ 
sa SCART, inevitabilmente si deve sob¬ 
barcare anche la spesa di un monitor. 
Inoltre, provando il collegamento con te¬ 
levisori dotati del connettore SCART, ci 
siamo resi conto che gli unici televisori 
che permettono il collegamento con il 


cavo in dotazione sono solo quelli Sony. 
Per il resto il computer offre Caratteristi¬ 
che di tutto riguardo, dall’uscita audio 
stereo al drive incorporato, alle enormi 
capacità grafiche e gestionali, ques ulti¬ 
me specialmente in MSX-DOS. Vera¬ 
mente un gran bel sistema, aspettiamo 
di veder circolare del buon software che 
ne sfrutti a fondo le caratteristiche. 


LA PAGELLA 
computer 

ESTETICA 

55/60 

MEMORIA 

45/60 

DISPLAY 

55/60 

ERGONOMIA 

50/60 

VELOCITÀ 

46/60 

SOFTWARE 

40/60 

USO 

45/60 

DOCUMENTAZIONE 

36/60 

COSTO 

40/60 

45.7/60 

LA PAGELLA 

drive 

CAPACITÀ 

50/60 

VELOCITÀ 

50/60 

TEMPO DI ACCESSO 

50/60 

COSTO 

40/60 

48.7/60 
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Offerta speciale per chi acquista 
* ’ l’annata completa di List 1985: 


ip* 9 NUMERI-156 PROGRAMMI 

1^^ a L. 31.500 (spese postali comprese) 

Rispetto al prezzo di un singolo arretrato (L. 7.000) 


ogni numero lo paghi solo la metà, 3.500 
lire, realizzando un risparmio di ben 31.500 lire totali. 



CSttSgSìs®*' 

! PBOSÌAMWI PER IL TUO HOME COMPUTEB 




DISPENSA 


COMPUTER 


GUIDA MERCATO 


SCUOLA E COMPUTER 
HTOGRAMMAZEONE 
VIDEOGIOCHI 

ROBOTICA 


CBM 64 


VIC 20 


SEGA SC 3000 


Su e giù per la penisola 

Electronic master mind 

Saliscendi 

Slot machine 

Boxe 

Jazzi 

Ciliege 

Il castello di Wiz 
Sci Alpino 
Dispersioni termiche 
Bioritmi 

Caccia all’U-Boote 
Analisi 

Conosci gli elementi 
Battaglia navale 
Breakdance 
Ferma il totale 
Biglietti da visita 
Elenco fornitori 
Sette e mezzo 


Vinci quattro 
Medusa 
Mission Venus 
Data base 
Snake 
Scheda su 

Michelangelo Buonarroti 
Omega Lander 
Olimpiadi 
Mr. Jum 

Disegnare con il computer 

Gioco dei fiori 

Caccia alla base 

Computermagia 

Enigmatematico 

La torre di Brahama 

Mondrian 

Spelling Words 

La cometa di Halley 

Leonardo da Vinci 


Analisi 

Numerazione 

Morra 

Lo stiscione 

The Lord of spider 

Sint coder 

automatica 

Master Mind 

Qua e là per lo stivale 


Flight Pian 

Test 

Paroliamo 


MPF II 

Tele costo 

Printer 20 

Astro war 

ZX SPECTRUM 

Piramide 

Pitagora 

Bioritmi 

Corso di Basic 

Sindrome cinese 

Contraerea 

Economia casa 

Tasti funzione 

Pianoforte 

Ragni 

Master Mind 

Wimbledon 84 

Il serpente 

Tiro a volo 

Numerino 

Black Jack 

Bilancio 

Capitali europee 

Uova spaziali 

Spectruman 


Easy sprite 

Fisherman 

Battaglia aera 

Linee zero 

ORIC - 1 

Geometria 1 

Triker 

Spider 

Il 13 minuto per minuto 

Break out 

Sort 1 

Ghost 

Super Master Mind 

Tombola 

Salta la rana 

Arredatore elettronico 

Crazy Word 

Reai Golf 

Gioco del lotto 

Levrieri 

Duello aereo 

Spaccamattoni 

Archer 

Il gatto e il topo 

Smash 

Shell sort 

Bruce 

Grafica 3D 

Flush 

Char-Consructor 

Dieta equilibrata 

Keyboard Codes 

Decisioni 

Parco Pubblico 

Funzioni trigonometriche 

Dragon master 

Calorie 

Cross-over 

Oceano 

Cubi 

Desing Lab. 

Advertising 

La vispa Teresa 

Sci 

Oric sequencer 

La casa stregata 

Logo tank 

Zodiaco 

Caccia grossa 

Equazioni di 1° e 2° grado 

Tutto il calcio 

Ascott 

Math Software 

Identikit 

Semina 

partita per partita 

MSX 

Fasi Lunari 

Accordi per chitarra 



MSX Sprite 

II bosco maledetto 

2001 odissea nello spazio 

ZX 81 

C 16 

Poker 

Il calcolo dei solidi 

Controller 

Swimming pool 

Saturn 

Pianta di fabbricati 

Data Base 


I pompieri 

Chimica 16 

Galactica 


TI 99/4A 

Il poeta Sinclair 

Aston 16: titolatrice 

Paint Draw 

SHARP MZ 700 

Anagrammi 

Condominio 

Clock 

Tennis 

Attacco aereo 

Le mine 

Supersnake 


Il pagamento va effettuato a mezzo assegno bancario, vaglia postale o c.c.p. n° 72609001 intestato a LIST 
— Programmi per il Tuo Home Computer — Casella Postale 4092 — 00182 Roma Appio. (Vedi modulo 

alle pagg. 81/82) 
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DI CALCIO 
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AGENDA 

TELEFONICA 
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E. FABRIZI 
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CATALOGO 

PROGRAMMI 

E. DI CARLO 

AFFINITÀ 
DI COPPIA 

E. DI CARLO 


DATA BASE 

F. FASCIANI 

LABIRINTO 

LETTERARIO 

RENUMBER 

F. FASCIANI 




PROGETTO 

D.A.C.I.A. 

D. CONTENTI 

GALAXI 

ADVENTURE 

O. CONTENTI 













































































G.t. comunicazione 


X-07 il computer portatile Canon, 



è un vero computer 
portatile, grande 
come un agenda. 


il sistema di 
trasmissione, con 
accoppiatore 
ottico, e 
senza cavo. 


* 


il sistema di 
espansione di 
memoria è su 
schede 
intercambiabili ed 
autoalimentate per 
conservare dati e 
programmi 



i programmi - tutti 
su scheda 
intercambiabile 
sono di reale 
utilizzo, dal file 
card (archivio) al 
graph card 
(informazioni in 
forma grafica), dal 
function card 
(programmi 
scientifici)al table 
card (informazione 
in forma di tabelle), 
al monitor card per 
programmatori 
professionali. 


la stampante plotter 
- stesse dimensioni 
del computer - 
scrive e disegna a 
quattro colori 


X-07 il vero computer portatile. 


| Canon Italia S.p.A Viale dell'Industria, 13 - Bussolengo, 

I Desidero ricevere maggiori informazioni sull’X-07 Canon 

1 NOMF 

Verona. 

| 

I r.OONOMF 

1 

| 

' VIA 

1 

1 CAP/CITTÀ 

1 

1 

1 

s X 

1 










NOI E L’INTELLIGENZA ARTIFICIALE 


Anche in questo numero molte le sorprese riservate ai 
nostri amici lettori. 

Come indicato nel titoletto, particolare attenzione è da 
dedicare ad un programma per il TEXAS TI-99/4A che 
affronta il problema della cosiddetta “Intelligenza Artifi¬ 
ciale”, argomento di cui molto si è già parlato e si parlerà 
in futuro. Il programma in questione è PROGETTO 
D.A.C.I.A., che, siamo sicuri, “stuzzicherà” l’interesse 
anche dei possessori di altri modelli di computers. 
Continuando la nostra carrellata a ritroso, sempre per il 
TEXAS presentiamo un videogames di fattura classica - 
GALAXI ADVENTURE. 

Gioiranno senz’altro gli utenti ZX-Spectrum ai quali sono 
dedicati ben tre programmi: una interessante routine/uti¬ 
lity di rinumerazione - RENUMBER-, un videogioco per 
così dire “combinato” - LABIRINTO LETTERARIO - ed 
un sempre utilissimo programma applicativo - DATA 
BASE. 

Anche su questo numero per gli amici dello SHARP pre¬ 
sentiamo un programma gestionale, che risulterà di vali¬ 
dissimo aiuto ai titolari di piccole e medie aziende - GE¬ 
STIONE MAGAZZINO. Un po’ di “ordine” va sembre 
bene! 

Per i possessori dello sfortunato SEGA SC-3000 questo 
mese viene pubblicata una vera “chicca”: con DRAWER 
avranno infatti a disposizione un veloce e versatile dise¬ 
gnatore elettronico. Il programma è scritto in Linguaggio 
Macchina e presenta delle caratteristiche molto interes¬ 
santi da studiare con cura. 


Standard MSX “cenerentole” di questo mese di Aprile. 
Uno solo infatti il programma presentato - WIMBLE- 
DON. Dopo le “fatiche” dei programmi proposti su LIST 
di Marzo (ricordate, tanto per citarne uno, il fantastico 
GHOST-MAZE?) un po’ di riposo per il nostro sempre 
abilissimo programmatore ci voleva! 

E per finire la nostra panoramica, i modelli COMMODO¬ 
RE fanno la parte del leone. Ben due infatti i programmi 
dedicati a ciascun modello, il CBM 64/128 ed il C16/ 
Plus 4. 

Il primo programma dedicato al Commodore “senior” è 
un interessante applicativo che vi aiuterà ad avere sem¬ 
pre a disposizione nella vostra programmo-teca persona¬ 
le - CATALOGO DISCHI. 

Il secondo è stato realizzato sull’onda del successo di una 
divertente trasmissione in onda su un noto Network - AF¬ 
FINITÀ DI COPPIA. Il vostro o la vostra partner è vera¬ 
mente la persona adatta a voi? Al “programma l’ardua 
sentenza! 

Per il Commodore 16, invece, ecco due programmi appli¬ 
cativi - CAMPIONATO DI CALCIO e AGENDA TELE¬ 
FONICA. 

Il primo, siamo sicuri, incontrerà senz’altro i favori di 
tutti i lettori “tifosi della Domenica”. Il secondo è ormai 
un classico, ma indubbiamente interessante anche per¬ 
ché mette in luce alcune particolarità del sistema. 
Questo è tutto - mica poco, vero? 

Come sempre a tutti buon lavoro. 

A.C. 


Tutti i programmi su questo numero 


COMMODORE 64/128 
C 16 

MSX 

SEGA SC 3000 
SHARP MZ 700 
ZX SPECTRUM 


TI 99/4A 


AFFINITÀ di COPPIA 
CAMPIONATO di CALCIO 
AGENDA TELEFONICA 
WIMBLEDON 
DRAWER 

GESTIONE MAGAZZINO 
DATA BASE 

LABIRINTO LETTERARIO 
RENUMBER 
PROGETTO D.A.C.I.A. 
GALAXI ADVENTURE 


di E. Di Carlo - Applicativo - cassetta L. 8.000 - disco L. 10.000 pag. 36 
di A. Castagni e M. Truscelli - Utilità - cas. L. 8.000 - dis. L. 10.000 pag. 48 
di M. Truscelli - Utilità - cassetta L. 8.000 - disco L. 10.000 pag. 50 
di F. Russo - Videogame - cassetta L. 8.000 - disco L. 10.000 pag. 51 
di E. Brunero - Utilità - cassetta L. 8.000 pag. 52 

di E. Fabrizi - Apllicativo - cassetta L. 8.000 pag. 65 

di F. Fasciani - Applicativo - cassetta L. 8.000 pag. 70 

Videogame - cassetta L. 8.000 pag. 72 

di F. Fasciani - Utilità - cassetta L. 8.000 pag. 74 

- di O. Contenti - Intelligenza Artificiale - cassetta L. 8.000 pag. 85 

di O. Contenti - Videogame - cassetta L. 8.000 pag. 79 


ATTENZIONE RICORDATE CHE PER VENIRE INCONTRO A TUTTI QUEI LETTORI CHE HANNO DIFFICOLTÀ INOLTRE RICOROATE CHE PER RICEVERE IL PROGRAMMA DESIDERATO. DOVETE COMPILARE IL MODULO 

NELLA DIGITAZIONE DEI PROGRAMMI PUBBLICATI SULLA RIVISTA. LIST OFFRE LA POSSIBILITÀ DI 01 C.C.P. PUBBLICATO ALLE PAGG 81/82 INDICANDO IL CODICE DEL PROGRAMMA RIPORTATO 
RICEVERE A CASA PROPRIA. SU SUPPORTO MAGNETICO IL SOFTWARE PUBBLICATO. SU QUESTO NELL'ELENCO 01 PAG. 81. OPPURE INVIANDO RICHIESTA CON ASSEGNO BANCARIO A LIST CASELLA 
NUMERO I PROGRAMMI DI CUI SI PUÒ RICEVERE COPIA SONO RIPORTATI NELL'ELENCO PRECEDENTE. POSTALE 4092 - 00182 ROMA APPIO. 
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CA TALOGO PROGRAMMI 

Un programma... per i vostri 
programmi! Ovvero: come avere a 
disposizione una rubrica elettronica. 



Il programma presentato in 
questo numero permette la 
catalogazione alfabetica di 
tutti i files presenti sui dischi 
di lavoro (o di gioco), con la 
possibilità di inserire accanto 
a ciascun titolo delle note 
esplicative. 

Le directories fornite dal 
D.O.S. sono molto chiare ma 
alle volte la lettura del solo ti¬ 
tolo non permette di capire 
immediatamente se quel pro¬ 
gramma è relativo ad un gio¬ 


co, ad una utility oppure se fa 
parte di un pacchetto softwa¬ 
re particolare (e ciò succede 
spesso se le nostre di¬ 
sco...teche sono composte 
da un buon numero di floppy- 
disk). 

Il catalogo programmi con¬ 
sente la creazione di una 
agenda alfabetica con TITO¬ 
LI, NUMERO DI BLOCCHI e 
TIPO PROGRAMMA desunti 
direttamente dalla directory 
ed inoltre il NUMERO (o 
nome) DEL DISCO e, natural¬ 
mente, LE NOTE, atte a forni¬ 
re notizie utili sulle caratteri¬ 
stiche di ciascun file, 
in uno dei prossimi numeri 
verrà presentata, a completa¬ 
mento di questo programma, 
un’utility che, sfruttando i 
files del catalogo, preleverà le 
note esplicative e le inserirà 


nell’indice disco presente in modo la stampa delle directo- 
memoria consentendo in tal ries disco complete di note. 


LETTERA * Fi *=. 


HUI1 

TITOLO 

BLK’ 

TIPO 

N. D 

NOTE 


1 

AFFINITÀ COPPIA 

70 

PRO 

A 

ENIO 


2 

ASTON 64 IV 

49 

PRG 

A 

MALTI 

LETTERA * C * 


nuli 

TITOLO 

BLK 

TIPO 

N.D 

NOTE 


1 

CODICI GRAFICI 

5* 

PRG 

A 

LIST 


2 

CARLA 

6 

SEC! 

A 

LIST 


3 

CATALOG DISK 

30 

PRG 

A 

ENIO 

LETTERA * U + 


NUH 

TITOLO 

BLK 

TIPO 

N.D 

NOTE 


1 

DESIGN LAB 

17 

PRG 

A 

MALTI 


2 

DESIGN LAB N 

17 

PRG 

H 

MALTI 


3 

DISK MONITOR MFC 

12 

PRG 

A 

PAOLO 


TTERR # 1 

- * 





Muri 

TITOLO 

BLK 

TIPO 

N.D 

NOTE 


1 

FUN PLOTT HPC 

16 

PRG 

A 

PAOLO 

LETTERA * 1 

=■ * 





NUH 

TITOLO 

BLK 

TIPO 

N.D 

NOTE 


1 

PRONOSTICI PLUS 

40 

PRG 

A 

ENIO 

LETTERA =* f 

T- * 





NUH 

TITOLO 

BLK 

TIPO 

N.D 

NOTE 


1 

RUBRICA TEL. 

57 

PRG 

A 

ENIO 


2 

RADICE 

93 

PRG 

A 

ENIO 








STRUTTURA PROGRAMMA 

10-210 

Inizializzazione variabili di lavoro. 


ne dei programmi sulla Directory. 

220-270 

MENÙ iniziale 

3000-3140 

Lettura e memorizzazione della Directory del Disco/ 

275-330 

MENÙ di lavoro. 


titoli. 

340-460 

Creazione/aggiornamento del catalogo. 

3500-3640 

Lettura del file dal disco/catalogo. 

465-525 

Menù per la scelta del tipo di correzione. 

4000-4175 

Routine per la ricerca, il confronto e la memorizzazio- 

530-565 

Routine per il richiamo isolato della Directory. 


ne dei titoli/DIR, titoli/File. 

570-585 

Routine per il richiamo isolato di un file/catalogo. 

4500-4595 

Sottoprogramma per il display della Directory (due 

1000-1120 

Scrittura note catalogo. 


titoli per linea con nome limitato ai primi 13 caratteri). 

1200-1345 

Ordinamento del file/catalogo. 

5000-5035 

Routine per display testata nuova pagina video. 

1400-1490 

Stampa video del file/catalogo. 

5500-5660 

Chiusura del programma. 

1495-1665 

Stampa del file con stampante (istruzioni per MPS 

6000-6025 

Gestione GET (menù e messaggio “Premi un tasto”). 


803). 

6500-6525 

Routine per DRIVE in errore. 

1670-1765 

Opzioni per stampa documento. 

7000-7025 

Routine intestazione pagine video display catalogo. 

1900-1950 

Routine per l’accertamento presenza/file in memoria. 

7500-8030 

Sottoprogrammi per abblencamento variabili indiciz- 

2000-2105 

Registrazione file. 


zate. 

2200-2445 

Routine per la correzione e/o la cancellazione dei re- 

8500-8595 

Formattazione del disco lavoro. 


cords del catalogo. 

9000-9125 

Istruzioni video del programma. 

2500-2700 

Routine per la correzione dei nomi e/o la cancellazio- 

9500-9525 

Routine riconoscimento I.D. disco/catalogo. 


ELENCO PRINCIPALI VARIABILI 


VETTORI 

C1$ 

W1$ 

Numero blocchi prog. Catalogo 

Tipo file Catalogo 

Y$ 

Titolo programmi Directory 

ND$ 

Etichetta del disco/Directory 

C$ 

Numero blocchi prog. Directory. 

NO$ 

Note relative al nome programma 

w$ 

Tipo del file Directory 

Z$ e 

Y1$ 

Titolo programmi Catalogo 

Z1$ 

Usate per il cambio display testate video 
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QUESTO PROGRAMMA È DISPONIBILE SU CASSETTA 0 DISCO PRESSO 
LA REDAZIONE. PER LE IS TRUZIONI DI A CQUIS TO CONSUL TATE LA 
PAGINA DI APERTURA DELLA SEZIONE PROGRAMMI. 



APPLICATIVO 

DI ENIO DI CARLO 




SEMPLICI 

Y$ 




X$ [- 

Lettura directory 


Stampante 

W$J 


L1$~ì 


ID$ 

I.D. del disco in lettura 

L2S ^ 

Linee per la stampa catalogo 

IX$ 

I.D. del disco/catalogo 

L3$ J 


zzs 

Variabile di comodo titoli testate 

0$^ 

Tabulazione 

NMS 

Lettera alfabeto per lettura file/catalogo 

B$ 

Compattazione linee stampa 

ND$ 

Label disco/Directory in lettura 

E$ 

Carattere normale 

CF 

Contatore generico 

F$ 

Carattere elongato 

NO 

Numero record del file/alfabetico 

NP 

N. titoli per ogni pagina stampa 

K 

N. titoli directory 

QT 

N. titoli per stampa parziale 

TD 

N. titoli directory utili al catalogo 



AB 

Contatore titoli directory stessa iniziale 


Varie 

DC 

Contatore titoli ancora presenti nella directory 

T$ 

GET 

TT 

N. titoli directory stessa iniziale memorizzati 


ANALISI DEL PROGRAMMA 


10-195 

200 

205-210 

220-270 


275-335 


340-455 


Vengono inizializzate le variabili di lavoro (caratteri, 
linee di stampa, stringhe titoli delle pagine video). 
Dimensionamento delle variabili indicizzate (previsti 
150 titoli per lettera alfabetica: l’indice 0 gestisce il 
nome directory). 

Richiamo dei sottoprogrammi di abblencamento va¬ 
riabili indicizzate. 

Menù iniziale. In questa prima pagina viene presen¬ 
tato un menù con il quale è possibile accedere alla 
routine delle istruzioni, alla formattazione del disco 
catalogo oppure passare direttamente al menù di la¬ 
voro. 

Se viene scelto quest’ultimo passo il programma ri¬ 
chiederà l’inserimento nel drive del disco lavoro per 
poterne memorizzare la I.D. utile in sezioni successi¬ 
ve. 

Menù di lavoro. Tale menù presenta le seguenti 
opzioni: 

1 Creazione/aggiornamento del catalogo 

2 Stampa 

3 Scrittura note 

4 Ordinamento 

5 Correzioni 

6 Registrazione file 

7 Richiamo file 

8 Lettura directory 

9 Chiusura programma 

La data (richiesta con la linea 288) viene stampata 
sulle pagine catalogo (utile per l’individuazione del¬ 
l’ultimo aggiornamento dell’agenda). 

Scelta 1 - Creazione/agg.to catalogo. La variabile 
DC (linea 355) controlla l’eventuale presenza in me¬ 
moria di una DIRECTORY/disco (dalla quale verran¬ 
no prelevati i titoli dei programmi). 

A richiamo DIR eseguita, vengono abblencate le va¬ 
riabili catalogo (linea 365) e viene effettuato il display 
DIR. 

Viene poi richiesta l’iniziale dei titoli DIR interessati 
alla formazione del catalogo. Se nessun titolo DIR 
inizia con la lettera prescelta, viene inviato il messag¬ 
gio ‘NESSUN TITOLO INIZIA PER...’, altrimenti in di¬ 
splay appare il n. dei titoli utili (linea 375 che richiama 
la SUB. = richiesta lettera e la SUB = individuazione 
presenza titoli). 

Vengono poi gestiti l’inserimento in memoria del file 
relativo alla iniziale prescelta (SUB 3500) e la ricerca 
dei titoli DIR nel file richiamato (SUB 4000). 

Una volta espletato il lavoro in questa parte della se¬ 
zione (i particolari vengono spiegati nelle subroutines 


465-525 


530-565 


570-585 


1000-1120 


1200-1345 


indicate), si ha la possibilità di ricercare altre iniziali 
oppure di ritornare al menù di lavoro. 

Scelta 5 - Correzioni. Questa subroutine permette di 
selezionare le correzioni sui files catalogo o sulla 
DIR. Le linee 510-525 visualizzano il messaggio in 
assenza di file o di DIR in memoria (nel qual caso le 
correzioni diverrebbero impossibili). 

Scelta 8 - Richiamo Directory. La DIR viene richia¬ 
mata automaticamente nella sezione Creazione cata¬ 
logo. È possibile però il richiamo autonomo se, ad 
es., fosse necessario cancellare dal floppy program¬ 
mi obsoleti o doppioni, ovvero per modificarne i titoli 
e catalogarli in doppioni, ovvero per modificarne i tito¬ 
li e catalogarli in modo esatto. 

Scelta 7 - Richiamo file catalogo. Viene richiamato 
il file catalogo di nostro interesse. 

Con tale file in memoria (non gestito dalla SCELTA 1) 
sono possibili tutte le operazioni presentate dal menù 
lavoro (stampa, correzioni, ordinamento ecc.). 

Scelta 3 - Scrittura note. Subroutine che permette la 
scrittura delle note esplicative dei programmi presenti 
nel file catalogo selezionato. 

Viene prima richiamata la subroutine di controllo del¬ 
la presenza file catalogo in memoria (linea 1020) ed 
in successione vengono presentate le schermate del 
file con richiesta del numero del titolo al quale dedi¬ 
care la nota. Inserendo il n. 0 (zero) si passa alla 
schermata successiva (8 titoli max) ovvero al menù di 
lavoro. Se la scrittura note dovesse risultare in qual¬ 
che modo errata, è sempre possibile richiamare il n. 
titolo relativo alia nota errata e ridigitare il tutto in 
modo corretto. La linea 1115 controlla la lunghezza 
del testo/nota che non deve superare i 33 caratteri. 
La linea 1082 richiama il sotto-programma registra¬ 
zione file. 

Se la variabile ‘note’ è inizializzata, questo continuo 
richiamo a tale SUB è necessario perché una volta 
inserite delle note il file catalogo precedente non è 
più attuale e dovrà quindi essere sostituito sul floppy/ 
disk. 

È possibile infatti, una volta terminato l’inserimento 
note e ritornati al menù lavoro, dimenticare la regi¬ 
strazione del file così modificato, vanificando tutte le 
operazioni fino a quel momento eseguite. 

Scelta 4 - Ordinamento. I files catalogo possono es¬ 
sere ordinati in tre diversi modi: 

1 alfabetico 

2 numero di blocchi crescente 

3 tipo di file (PRG, REL, SEQ, USR...) 
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Il sort è gestito dalle linee 1320-1330. 

1400-1765 Scelta 2 - Stampa. La linea 1420 richiama la SUB 
per il controllo del file in memoria. 

1425 — Menù selettivo per stampa video, stampa 
carta o ritorno al menù di lavoro. 

1455-1490 - Display di nove titoli file alla volta. Sullo 
schermo sono presentati i TITOLI, il N. BLOCCHI, il 
TIPO file e, in reverse le NOTE. Se la stringa note 
non è stata inizializzata, viene visualizzato un trattino 
in reverse. 

1495-1500 - Stampa totale: viene richiesto il n. dei 
titoli da stampare per pagina (ci si può regolare nella 
richiesta tenendo presente il formato carta utilizzato e 
il n. dei titoli del file). Al termine della stampa si ha il 
ritorno al display menù stampa. 

1565-1665 - Stampa parziale: è possibile visualizzare 
l’intero file per poter scegliere il n. di titoli interessati 
alla stampa parziale. 

A stampa avvenuta si ha, anche in questo caso, il 
ritorno al display menù stampa che consente di sele¬ 
zionare eventualmente un diverso file da stampare. 
1670-1765 - Routine per la stampa del file catalogo 
interessato. Le linee 1695-1700 gestiscono l’incolon- 
namento del n. relativo al titolo, mentre le linee 1715- 
1720 gestiscono quello relativo al n. dei blocchi. 

1900-1950 Subroutine che consente di individuare la presenza o 
meno di un file catalogo in memoria. Il richiamo di 
tale SUB avviene in molte delle sezioni del menù la¬ 
voro, consentendo la continuità del programma. 

2000-2105 Scelta 6 - Registrazione file catalogo. Dopo il con¬ 
trollo presenza file in memoria, viene richiesto l'inse¬ 
rimento del disco lavoro nel drive (con logico control¬ 
lo della I.D.-linea 2052). Le linee 2060-2105 gestisco¬ 
no la registrazione del file in memoria. 

2200-2445 Scelta 5 - SUB Correzione file catalogo. Una volta 
accertata la presenza in memoria di un file (2220), 
con successive schermate vengono presentati tutti i 
record di quel file. Al termine di ogni pagina video 
può essere selezionato il n. del titolo da correggere, 
vengono visualizzati i quattro campi del record (2310- 
2325). I numeri da 1 a 4 consentono la correzione del 
campo relativo, mentre con il n. 5 è possibile la can¬ 
cellazione dell’intero record. Lo zero permette di ritor¬ 
nare alla pagina video lasciata per la correzione. 

Le linee 2355-2405 gestiscono gli input di correzione 
campi, mentre le linee 2420-2445 consentono la can¬ 
cellazione completa del record. 

La linea 2410 richiama la SUB ordinamento alfabeti¬ 
co nel caso di cancellazione. Il record cancellato vie¬ 
ne in tal modo posizionato all’ultimo posto nel file (la 
variabile titolo è inizializzata con il carattere ASC 
160), e poi sottratto dal numero di record presenti nel 
file in esame. 

In tal modo, nella successiva fase di registrazione, 
vengono memorizzati sul floppy solo i record utili. 

2500-2700 Scelta 5 - SUB Correzione Directory. Viene fornito il 
display di max. 15 titoli alla volta, dal quale è possibi¬ 
le rintracciare il file d’interesse per la correzione (in¬ 
serendo il n. relativo) o la cancellazione (inserendo il 
n. 1 viene richiesto il n. del programma da cancella¬ 
re). 

Il disco interessato alla correzione e/o alla cancella¬ 
zione deve essere inserito nel drive privo delle prote¬ 
zioni poiché in caso contrario il display successivo 
riporterà il nome corretto (o la sua cancellazione), ma 
sul floppy tutto sarà rimasto invariato, anche se il dri¬ 
ve non risulterà in errore (le linee 2600 e 2665 una 
volta terminata la routine di provenienza indirizzano il 
programma alla SUB di linea 6525 per inizializzare 
comunque il drive). 

3000-3175 Scelta 8 - Lettura Directory. Viene richiesto il n. eti¬ 
chetta del disco da leggere (linea 3020). L’inserimen¬ 
to riguarda naturalmente il numero (o il nome) asse¬ 


gnato al floppy dall’utente (e non l’etichetta Directo¬ 
ry!). Questa particolare label deve essere digitata 
esattamente perché è con essa che il programma rie¬ 
sce a selezionare i titoli DIR da memorizzare. 

Ad es., nel file lettera A è presente un record con le 
seguenti caratteristiche: 

TITOLO Paperino 
N. BLK 100 
TIPO PRG 
N. DISK 10 
NOTE gioco 

Letta la DIR del disco 11 e selezionati i titoli con ini¬ 
ziale A, viene rintracciato: 

TITOLO Paperino 
N. BLK 100 
TIPO PRG 
Il programma segnala: 

Paperino già in catalogo con n. disco diverso 
Memorizzo (s/n)? 

Abbiamo in tal modo la visione di un duplicato del 
programma. Questo se, e solo se, la label disco 11 è 
stata inserita esattamente. 

Le linee da 3040 a 3140 gestiscono la lettura della 
DIR con contemporanea inizializzazione delle variabi¬ 
li Disco/lavoro. La linea 3083 segnala ‘DRIVE in erro¬ 
re’ nel caso di mancanza floppy o errata chiusura 
della Periferica. 

3500-3640 Scelta 7 - Richiamo file calalogo. Dopo la richiesta 
della lettera alfabetica d’interesse, viene controllata 
la I.D. del disco inserito (linea 3530). Se la I.D. risulta 
diversa da quella del disco lavoro viene inviato il mes¬ 
saggio di inserimento disco errato (linea 3540). La 
lettura del file è gestita dalle linee 3545-3600. 

4000-4175 Ricerca e memorizzazione titoli. Questa sezione 
viene richiamata con la SCELTA 1. È utilizzata suc¬ 
cessivamente alla lettura DIR. all’input dell’iniziale ti¬ 
toli e al richiamo dei file lettera alfabetica. 

In questa fase è possibile memorizzare tutto ciò che 
nella DIR inizia con la lettera selezionata oppure i soli 
files PRG (linee 4020-4035). Il ciclo che inizia a linea 
4045 ricerca e confronta i titoli DIR con i titoli file (vedi 
Lettura DIR). Viene così mostrato il titolo DIR da me¬ 
morizzare ovvero l’assenza di titoli utili per il catalo¬ 
go- 

La linea 4172 rimanda il programma alla routine IN¬ 
SERIMENTO NOTE per offrire all’utente un immedia¬ 
to aggiornamento del file alfabetico. 

4500-4595 Display Directory. La visualizzazione della DIR vie¬ 
ne gestita in modo da presentare sul video, dopo ogni 
scelta dell’iniziale e successiva routine selettiva, i soli 
titoli ancora da ricercare. 

In luogo del display DIR del record memorizzato, vie¬ 
ne posta una linea tratteggiata compresa tra due 
asterischi (linee 4565-4575). A titolo DIR interamente 
rintracciati, compare il messaggio ‘nessun titolo nella 
Directory’. 

5500-5640 Scelta 9 - Chiusura programma. Per una eventuale 
scelta errata della sezione, viene offerta l’opportunità 
di ritornare al menù di lavoro (5520-5540). 

Viene accertato se il file in memoria è stato o no regi¬ 
strato e se si desidera la stampa. Alla richiesta di fine 
sessione, a risposta negativa si ha il ritorno al menù/ 
lavoro. 


SUBROUTINES SECONDARIE 

5000-5035 Gestione delle testate pagine di lavoro. La scritta in¬ 
terna alla cornice è continuamente variata mediante 
inizializzazione della stringa ZZ$ nei vari passi del 
programma. 

6000-6025 Gestione della GET del programma. 

6500-6525 Routine per ripristinare il funzionamento corretto del 
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Drive in errore. 

8500-8595 

Subroutine che permette la formattazione del disco/ 

7000-7025 

Sottoprogramma richiamato per l’intestazione delle 
pagine stampa/video. 


lavoro. Viene consigliata la scelta di una I.D. poco 
comune perché il suo riconoscimento consente poi di 

7500-7530 

Abblencamento delle variabili destinate a contenere i 


evitare errori suH’inserimento disco nel drive. 


records delle Directories. 

9000-9125 

Breve descrizione sul funzionamento del programma. 

8000-8030 

Abblencamento delle variabili di lavoro dei files alfa¬ 
betici. 

9500-9590 

Routine che consente il riconoscimento della I.D. del 
disco lavoro. 


10 REM ******************************** 


* * * 

15 REM * CATALOGO PROGRAMMI * 

* * 

20 REM * UTILITV PER COMMODORE 64 * 

* * 

25 REM * PERIFERICHE DRIVE E STAMPANTE* 
* * 

30 REM * - * 

* * 

35 REM * DI * 

* * 

40 REM * EHIO DI CARLO * 

* * 

45 REM * <C> 1986 * 

* * 


50 REM ******************************** 


$ $ 

280 REM * MENU' LAVORO * 

* * 

285 REM ******************************* 


288 IX$=ID$ : INPUT'‘MINSERISCI DATA'';DT* 
290 POKE53280,7 :P0KE53281,7 : PRINT'T*" 

295 ZZ*=Z*<1) GOSUB5015 
300 PRINT"H1"Z$<2> 

305 PRINT"M2"Z1*<3):PRINT”M3"Z1*<4) 

310 PRINT"S4"Z1$(5) : PRINT"S5"Z1$(6) 

315 PRINT"S6“Z1*<7):PRINT"M7"Z1*<8) 

320 PRINT"S8"Z1$< 1 > : PRINT"M9 FINE LAVORO 

325 GOSUB6020■IFT$= ' S 1 ‘THEN5515 

330 ONVAL (. T$>G0SUB355 , 1415, 1015, 1215, 480 

,2015,585,545 


55 POKE53280,5•P0KE53281,5 : PRINT’ TU 

60 Ll$=" i-1-:-1-1- 

—' - 1 -" 335 OQTQ290 

65 L1*=L1*+ ’-i" 340 REM ******************************* 

* * 

345 REM * CREAZIONE/AGO.TD CATALOGO * 
* * 

350 REM ******************************* 


70 L2$=" I-1-1-1- 

—,- 1 - 

75 L2*=L2$+"-1" 

80 L3*=" 1 - 1 - 1 - 1 - 

85 L3*=L3$+"- 

120 UM$= ‘ 'MKSSBSlfltìtìS UN MOMENTO 

PREGO_" 

125 0*=CHR*<16):B$=CHR$<8)'EJ=CHR$<15) = F 
*=CHR*<14> 

130 Z*a>=" CATALOGO P R 0 G R 
A M M I" 

135 Zi(2> = " CREAZIGNE/AGG,TO CATALOGO" 
140 Zi(3> = " DISCO LAVORO" 

145 Zi<4)=" ISTRUZIONI" 

150 ZiC5)=" FORMATTAZIONE DISCO LAVORO" 
155 ZiC6)=" MEMORIZZAZIONE ID" 

160 Zli<1)=" LETTURA DIRECTORV" 

165 Z1i<2) = " RICERCA TITOLI DIRECTORV" 
170 Zli<3)=" STAMPA" 

175 -Zl$'.'5)=" ORDINAMENTO" 

180 Zli(4)=" SCRITTURA NOTE" 

185 Z1ÌC6)=" CORREZIONI" 

190 Zli(7)=" REGISTRAZIONE FILE LAVORO" 
195 Zli<8)=" RICHIAMO FILE LAVORO" 

200 DIM VÌ<150),Cia50),WÌ<150),Cl$<150) 
, V1 i a 50 >, W1 i a 50 ), NDi < 150 ), NOi a 50 > 

205 GQSUB8015 
210 G0SUB7515 

215 REM ******************************* 
* * 
220 REM * MENU' INIZIALE * 

* * 
225 REM ******************************* 


230 POKE53280,0•P0KE53281,0 : PRIHT"S" 

235 ZZÌ=ZÌ<1>:GOSUB5015 

240 PR I NT "MI "Zi < 4 ) : PR INT ":«2 "Zi < 5 ) 

245 PRINT"W3 MENU' LAVORO" 

250 GOSUB6020 : IFTÌ= 1 '1 ''THENGOSUB9015 : GOTO 
235 

255 IFTÌ="2• 'THENG0SUB8515 :G0T0235 


260 IFTi="3"AND IDÌ="" THENGOSUB8520 : GOT 
0288 

265 IFTÌ="3"AND IDiO"" THEN288 
270 GOTO250 

275 REM ******************************* 


355 IFDC=0 ORVÌ(1)=""THENG0SUB545 
360 ZZÌ=" "+Zli<2) : GOSUB5015 

365 GOSUB8020 
370 00SUB4515 

375 AB=0 • GOSUB3630 •' GOSUB440 
380 IFAB=0THEN395 
385 G0SUB3515 : GOSUB4015 :GOTO370 
390 G0SUB4515 

395 PRINT"«ALTRA INIZIALE <S/N)?" 

400 GOSUB6020:TXÌ=TÌ 

405 IFTXÌ“"N"RND AB=0THENNXÌ="": RETURN 

410 IFTXÌ="N"ANDTT>0 THENGOSUB1025 NXÌ=” 

"RETURN 

415 IFTXÌ="N ' 'THENNXÌ="": RETURN 

420 IFTXÌ="S"ANDTT>0 THENGOSUB1025 : GOT03 

70 

425 IFTXi=”S ' 'THEN370 
430 GOTO400 
435 G0SUB3515■G0T0385 
440 FOR I=2T0K 

445 IFNXÌ=LEFTi(VÌ<I),1)THENAB=AB+1 
450 NEXTI 

455 IFAB=0THENPRINT'’IWESSUN TITOLO INIZI 
A PER "NXi-RETURN 

460 FRINT"««"AB"TITOLI DIR. CON INIZIALE 
' 'NXi : GOSUB6015 : RETURN 
465 REM ******************************* 

* * 

470 REM * SCELTA CORREZIONI * 

* * 

475 REM ******************************* 


480 ZZÌ=" "+Zli<6) : GOSUB5015 

485 FRINT"SI CATALOGO":PRINT"»2 DIRECTOR 
V":RRINT"W3 MENU' SEZ. CATALOGO" 


498 GOSUB6020 IFTi="l"THEN5Ì0 
495 IFTi="2 ' 'THEN520 
500 IFTÌ="3"THEHRETURN 
505 GOTO490 

510 IFV1Ì< 1 ) = ""THENPRINT")(HESSUN FILE IN 
MEMORIA":GOSUB6015 :GOTO480 
515 G0SUB2215 GOTO480 
520 IFVi(1>="''THENPRINT''IWESSUNA DIRECTO 
RV IN MEMORIA" : GOSUB6015 : GOTO480 
525 G0SUB2515 GOTO480 
530 REM ******************************* 


* * 

535 REM * RICHIAMO DIRECTORV ISOLATA * 
* * 

540 REM ******************************* 


545 IF TT>0ANDNOÌ= '''THENPRINT"13" ; GOSUB10 
25 :TT=0 

550 ZZi=" "+Zli<1):GOSUB5015 

555 GOSUB7520:NDÌ="":GOSUB3015 
560 IF Vi(1)O"‘’THENA1 = 1 


565 PRINT''SDIRECTORV DISCO/PROG. "NDi" M 

EMORIZZATA ' 1 :OOSUB6015•RETURN 

570 REM ******************************* 

* * 

575 REM * RICHIAMO FILE ISOLATO * 

* * 

580 REM ******************************* 


585 NXt="":G0SUB3515 : RETURN 
1000 REM ****************************** 
* * 

1005 REM * SCRITTURA NOTE CATALOGO * 
* * 

1010 REM ****************************** 


1015 ZZi=" SCRITTURA NOTE PROGRAMMI" 

:GOSUB5015 
1020 GOSUB1915 

1022 IF CJ=1THEN CJ=0 ZZt=" SCRITTUR 

A NOTE PROGRAMMI GOSUB5015 

1025 PRINT"W DEVI INSERIRE DELLE NOTE LE 

T."NMÌ"<S/N>?" 

1030 GOSUB6020 

1035 IFTÌ="S' ’THENCF=0 :K1 = 1•GOTO1050 
1040 IFTÌ="N''ANDTT=0THENRETURN 
1043 IFTÌ= ' 'N''ANDTTO0THENGQSUB2025 : RETUR 
N 

1045 GOTO1030 
1050 FOR I=K1TONO 
1055 IFCF=0THENGOSUB7015 
1060 CF=CF+1 

1065 PRINTMIDi<STRi(0,2)" "Vli< I )TAB<19 
> C1ia)TAB <24 > W1ia)TRE <28 >NDi<I> 

1070 FRINT" a"NOÌCI) 

1075 IFCF=9 ORI=N0 THEN1085 

1080 NEXTI : IFNOÌ= ""THENRETIJRN 

1082 GOSUB2025'NOÌ="": RETURN 

1085 PRINT"SINSERISCI IL N. DEL TITOLO < 

0=FINE)", 

1090 INPUT NIJ IF NU=0THENCF=@ : GOTO 1080 

1095 I FNU> IORHIJCI-CF+1THEN1105 

1100 G0T01110 

1105 PR I NT "TTT" GOTO 1085 


1110 FRINTNU''HOTA="j: INPUTNOi 

1115 IFLEN <NOi> >33THENG0SUB1150 GOTO1110 

1120 NOÌ<NU)=NQÌ K1fI-CF+1■CF=0:GOTO1050 

1150 I FLEN <: NOi ) =34THEN 1160 
1155 IFLEN<NOi)>34THEN 1165 
1160 PRINT'Tl 

TI": RETURN 
1165 FRINT"TI 

1170 PRINTT 

T ' : RETURN 

1200 REM ****************************** 

* * 

1205 REM * ORDINAMENTO FILE CATALOGO * 

* * 

1210 REM ****************************** 
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1215 ZZf=" 

1220 GOSUB1915 


"+Z1f < 5) : GOSUB5015 


1222 IFCJ=1THENCJ=@:ZZf=" ”+21 

tC5>:GOSUB5015 

1225 PRINT"MflDEVI ORDINARE IL FILE CS/N) 
?" 

1230 GOSUE6020 
1235 IFTf="S"THEN1250 
1240 IFT$="N''THENRETURN 
1245 GOTO1230 

1250 PRINT'TERBIMOMENTO LETTERA S"NMt 
1255 PRINT"W*PREMI : " 

1260 PRINT"W1 ALFABETICO":FRINT"K2 N. EL 
OCCHI":PRINT"W3 TIPO FILE" 

1265 GOSUB6020 

1270 IFTf="1'THENZf= ' 'ALFABETICO" : Z=1 : GOT 
01290 

1275 IFTf="2"THENZf» ''N. ELOCCHI"-2=2■GOT 
01290 

1280 IFTf="3"THENZf»"TIPO FILE":Z=3: GOTO 
1290 

1285 G0T01265 

1290 PRINT 1 TJDRDINAMENTO "Zf■PRINTUMf 
1295 FORI®ITO HO-1 
1300 F0RJ=I+1 TONO 

1305 IF Z= 1THEN IFV1 f < I )OV 1 f C J)THEN1335 

1310 IF Z=2THEN I FV AL ( C1 f C I > > <=V AL C C1f C J 
>)THEN1335 

1315 IF Z=3THEN1317 

1316 GOTO1320 

1317 IFLEFTfCNQf<I>,1)CLEFTfCNO#CJ),1>TH 
ENI335 

1318 IFLEFTfCHOfC I ) , 1 >=LEFTfCNQfCJ>.. 1 >AN 
DV1 $(I )<V 1 f CJ>THEN 1335 

1319 IFLEFTf'.:NO*( I > , 1 )=LEFT$ <NO* < J), 1 > AN 
DV1f <I> =V1f < J) THEN1335 

1320 V1 *=V 1 *(I) :c 1 *=C 1 *(I> W1 *=W 1 *( I ) :NH 
*=ND*(I) : N0f=N0fC I ) 

1325 V1 * CI )=V1 * < J ) : C1 * CI > =C 1 * C J ) W1 f C I >= 
W1* < J):NB* CI)=ND*C J>: NO*CI) =NQfC J) 

1330 V1 * C J >=V 1 * : C1 * C J ) =C 1 * ■ W1 * C J )=w 1 * : NIi 
* CJ)=HD* : NO*C J > =M0* 

1335 NEXT J 


1340 NEXT I : IFZ1 = 1THENRETURN 

1345 FRI NT "MMORD INAMENTO "Z*" EFFETTUATO 

" : GOSUB2025: RETURN 

1400 REM ****************************** 

* * 

1405 REM * STAMPA FILE CATALOGO * 

* * 

1410 rem ****************************** 


1415 ZZf» • ' "+Z1 * C 3 ) •• GOSUB5015 

1420 XX»1 GOSUB1915 

1422 IFCJ=1THENCJ=0 : ZZ*= " "+Z1 

*C3>:GOSUB5015 

1425 PRINT"M9 1 VIDEO" : FRI NT "S 2 STAMPAI) 
TE" PRINT"*] 3 FINE" 

1430 GOSUB6020 

1435 IFT*= 1 '1"THENGOSUB1455■A3=1•GOTO1415 
1440 IFT#="2"THENGOSUB1495 : A3=1 G0T01415 
1445 IFT*="3"THENXX=0:GOTO290 


1450 GOTO1430 

1455 PRI NT ''Tiri ISPLAV VIDEO 1 ' : CF=0 
1460 FORICI TO NO 
1465 IF CF=@ THEN 608UB 7015 
1470 CF=CF+1 

1475 PRINTMID* C STR* CI>,2 >TAB <3> V1*CI>TRE 
C19 ) C1 f CI)TABC 24 )W1* CI)TAB C 28 )ND*CI) 

1480 PRINT" S"NO*CI> 

1485 IFCF=9 OR I=NO THENGOSUB6015:CF=0 
1490 NEXT I : RETURN 

1495 FRINT"^STAMPA CON MPS 803":PRINT"MS 
LETTERA ' 'NMf' 1 PRESENTI ' 'NO'TITOLI 


1500 PRINT":«M 1 TOTALE" ; PRINT"W 2 F'ARZIA 
LE" 

1505 GOSUB6020 

1510 IFTf=”1"THENGOSUB1750'GOTO1525 
1515 IFT*="2 ' 'THEN1565 
1520 GOTO1505 . 

1525 PRINT"I3STAMPA TOTALE LETTERA "NMf" 
TITOLI"HO 

1535 GOSUB1670:G0SUB1685:CF=0 
1540 FOR 1=1 TO NO 
1545 CF=CF+1•GOSUB1690 
1550 IF KNO THENGOSUB1685 
1552 IF I=NO THEN1560 

1555 IFCF=NPTHENGOSUB1740 GOSUB1760 : GOSU 
B1670 : GOSUB1685 
1560 NEXT I^ GOSUB1740 : RETURN 
1565 PRINT".! STAMPA PARZIALE" 

1570 PRINT"*»] DISPLAY FILE LETTERA "NM*" 
CS/N>?" 

1575 GOSUB 6020 

1586 IFT*="S"THENCF=0:GOSUB1460:G0T01595 

1585 IFT*="N"THEN1595 
1590 GOTO1575 

1595 INPUT"*] N. TITOLI DA STAMPARE»";QT 
1600 IF QT>NO THENPRINT"TTT' : QT=@ : G0T015 
95 

1605 PRINT"*] DA QUALE NUMERO CI -"NO")"; 
1610 INPUT QN 

1615 IF QT+QN>NO THENPRINT ' 'TTT ' •' QN=0 : GOT 
01605 


1620 GOSUB1750 : CF=0 

1625 PRIHT"*I DEVI STAMPARE LA TESTATA CS 

/N>?" 

1630 GOSUB6020 : IFT*="N''THEN0PEN4.■ 4 : GOTO 1 
645 

1635 IFT*="S ' THENGOSUB1670 :GOSUB1685 :GOT 
01645 

1640 GOTO1630 

1645 FOR I=QN TO QN+QT-1 

1650 CF=CF+1 GOSUB1690 

1655 IFKQN+QT-1 AND CFCNP THENGOSUB 1685 

1660 IFCF=NP AND ICQN+QT-1 THENGOSUB1740 
:GOSUB1760 :GOSUB1670 : GOSUB1685 
1665 NEXTI :GOSUB1740 : RETURN 
1670 0PEN4,4 : PRINT#4.. F*J "LETTERA * "; NM 
*;" * ' 'E* ; DT * : PR INT#4,Ef ; L1f ; B* 

1675 PRINT#4 ,E*; " INIJM I TITOLO I 
BLK I TIPO! N.D I NOTE"; 

1680 F'RINT#4.. 0*; "72"; " I "; B* • RETURN 
1685 PRINT#4,E*;L2*;E* RETURN 


1690 PRINT#4,E*;"I"; 

1695 IF I<1WTHENPRINT#4,0*; ' '03 ' ' ;MID* C STR 
*CI),2,1); GOTO1710 

1700 IF IC100THENPRINT#4,0*; ''02'';MID*CST 
R*CI)j2;2); : GOTO1710 

1705 PRINT#4j 0*;"01MID*CSTR*<I>,2,3); 
1710 PR I NT#4.. 0* ; "04 " ; " I " ; V1 * CI ) ; 0* ; ”22 " ; 
"l 

1715 IFMI li* C C1 * C I >, 2, 1 ) =CHR* C 32 ) THENPR IN 
T#4,0*.; ”26";LEFT*CC1*CI).. 1).. : GOTO 1730 
1720 IFM ID*CCI * C I ), 31 ) =CHR*C32) THENPR IH 
T#4.. 0*; ' '25 ' ' .■ LEFT* C C1 * C I ) ,2 > >■ GOTO 1730 
1725 PRINT#4,0*;"24";Cl*CI); 

1730 PRINT44," I ";W1*CI>;” l";ND*CI);0* 
; "40"; " i ";no*cd;o*; "72"; "l”;B* 

1735 RETURN 

1740 PRINT#4,E*;L3*;B* 

1745 CL0SE4 : RETURN 

1750 NP=0 : INPUT"*! N. TITOLI PER PAGINA»" 

;np 

1755 RETURN 

1760 CF=0:PRINT''MCAMBIA FOGLIO E"■G0SUB6 
015 - . 

1765 PRINT"3STAMPA NUOVA PAGINA " RETURN 
1900 REM *****m***i*******«*«*it!*ii!*)ti*** 

* * 

1905 REM * PRESENZA FILE IN MEMORIA * 

* i* 

1910 REM •***♦.**•♦♦* ♦+* 


1915 IFNM*= ' ' ' 'THEN1950‘ 

1920 PRINT"FILE PRESENTE IN MEMORIA-; LE 
TTERA "NM* 

1925 PRINT"*] VUOI CAMBIARLO CS/N)?" 

1930 GQSUB6020 

1935 IFT*="N'THENRETURN 

1940 IFT*= ''S''THENNM*=NX*="'' : G0SUE3515 

:CJ=1: RETURN 

1945 GOTO1930 

1950 PRINT"NESSUN FILE E" PRESENTE IN ME 
MORIA'' : GOSUB6015 :XX=@ GOTO290 
2000 REM ****#*'*****i**4*4*4***.t4**4*4*4 
* * 


2005 REM * REGISTRAZIONE FILE CATALOGO* 
* * 
2010 REM ****************************** 


2015 ZZ*= " RÈGISTRAZIONE TITOLI "+ 

NMf : GOSUE5015 

2020 IFNMT= "THENGOSUB 1915-RETURN 
2025 PRINT-WDEVI REGISTRARE LA LETTERA " 
NMf" CS/N>?" 

2030 GOSUB6020 
2035 IFTf="S ' 'THEN2050 
2048 IFTf="N'THENRETURN 
2045 GOTO2030 

2050 R1=1 GOSUB9520 IFIXf=IDfTHEN2060 
2055 PRINT"WIL DISCO INSERITO E" ERRATO" 
GOSUB6015 : GOTO2050 

2060 0PEN5.. 8, 5 1 '@0 : LETTERA ' '+NMf+ "SW " : 
S=1 

2065 PR I NT#5 .■ NO 
2070 F'R I NT#5 ■ C1 f C S ) 

2075 F'RINT#5.. Vlf CS) 


2080 PRINT#5.' Wlf CS) 

2085 PR I NT#5 .■ NDf C S ) 

2090 PRINT#5,NO»C S) 

2095 IFS=NO THEN2105 

2100 S=S+1 : GOT02070 

2105 TT=0 :CL0SE5: RETURN 

2200 REM ****************************** 

* * 

2205 REM * CORREZIONI FILE CATALOGO * 

* * 

2210 REM ****************************** 

2215 ZZ$= " CORREZIONI FILE LETTERA " 
+NM$iGOSUB5015 
2220 GOSUB1915 

2222 IFCJ=1THENCJ=0 ; ZZf= " CORREZIONI 
FILE LETTERA ' '+NMf:GQSUB5015 
2225 PRINT"W DEVI FARE CORREZIONI? CS/N) 

2230 GOSUB6020 

2235 IFTf="S”THENCF=@■R1 = 1 :06=1 GOTO2250 

2240 I FTf = ' 'N ' 'THENRETURN 
2245 GOTO2230 
2250 FOR MM=K1 TONO 
2255 IFCF=0THENGOSUE7015 
2260 CF=CF+1 

2265 F'RINTMIDf CSTRf CMM) . 2) " "Vlf CMM>TABC 
19)C1fC MM)TAB C24)W1f CMM)TAB C 28)NDfC MM) 
2270 PRINT" BTNOfCMM) 

2275 IFCF=9 ORMM=NO THEN2285 
2280 NEXTMM 

2282 IF FC=1THENGOSUB2025 

2283 FC=0: RETURN 

2285 PRINT"«QUALE NUMERO DA CORREGGERE<0 
=FINE > ' ' ; 

2290 INPUT NX : IFNX=0THENCF=0•GOTO2280 

2295 IFNX>MMORNX<MM-CF+1THEN2305 

2300 GOTO2310 

2305 F'RINT"TTT' : G0T02285 

2310 GOSUB5015 ■' PR I NT "SI TI TOLO= • "V1 f C NX 

2315 PRINT 'm N.BLOCK»"C1fCNX) 


2320 'PRINT"DB N.DISCO»"NDfCNX) 
2322 PR INT' 'S4 TIP. PRG= "W1 f C NX ) 
2325 PRINT"DE NT=S"NOfCNX) 


40 
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2330 PRI NT "«OLIRLE NUMERO <0=FINE 6=CANC 
ELLR>" 

2335 GOSIJB6020 : I FVftL < T $ ) >6THEN2335 
2340 I FT*= ' 'THEN2450 

2345 ONVRL<T*)GOT02355,2365,2385,2406,23 

95,2410 

2350 GOTO2310 

2355 PRINT"«TITOLO=", ■ INPUTY1*<NX) : IFLEN 
<V1*<NX>)<=16THENN0*®" 1 " ■ FC=1=G0T02310 
2360 PRINT""! 

TI" : G0T02355 

2365 PRINT"»!. BLOCK®"; : INPUTCUCNX) TFLE 
N(CUCNX) ><=3THENN0*= " FC=1 G0T02310 
2370 PRINT"H 

Ti":nnTn2365 

2375 IFLEN<C1*<NX>>=1THENC1 *<NX>=C1 $< NX> 
+ " ' ' :G0T02310 

2380 IFLEN<C1 *<NX))«2THENC1*<NX> =C1* < NX) 
+" ":GOTO2310 


2385 PRI NT ' -j*N. li I SCO® ' V I NPUTND*< NX > : IFLE 
N(ND$<NX))<=5THENND*="" FC=1 GOTO2310 
2390 PRINT""] 

TT' : G0T02385 

2395 F'RINT''«NT* " PR INTTAB<4) ''* 

l.J 1—L.I IJL.J Li-1 l.LI LJL.I 11 I U.l|" 

2400 PRI NTTAB<3>'"71"; : INPUTNO*<NX> : IFLEN 
<NO*<NX)>C=33THENN0*="" FC-l:G0T02310 

2405 PRINT""! 

Tl" : G0T02395 

2406 PRINT"MTIPO ="; : INPUTW1*<NX >: IFLE 

N<W1* <INX).K=3THENW1*=.FC=1 • GOTO2310 

2407 PRINT""] 

TT' : GOTO2406 

2410 PRINT"«CANCELLO TUTTO <S/N>?" 

2415 GOSUB6020 IFT*="N "THEN2310 

2420 IFT*="S"THENPRI NT "M CANCELLO "VI 

*<NX) GOTO2430 

2425 G0T02415 

2430 Cl*<NX>="-" : Y1*<NX> =CHR*<160> : NO*< N 
X ) = ' ’- " : NO* (. NX) = W1* <NXZ1=1 

2448 PR I NT • 'TTTTTTT 'IJM* Z= 1 : GOSUB 1295:21 = 
0 : NO=NO-1 FC=1 

2450 K1=MM-CF+1 :CF=@’GOTO2250 

2500 rem ****************************** 

* * 

2505 REM * CORREZIONI BIRECTORV DISK * 

* * 

2510 REM ****************************** 


2515 ZZ*=" CORREZIONE DIRECTORY DISCO 
"+ND* GOSUB5015 

2520 PRINT ' '«1 CORREZIONE ' ' :PRINT ' 'SE MENU 
CATALOGO DISCHI" 

2525 GOSUB6020 IFT*="l'THEN CF=0 K1 =2 60 
T02535 

2530 IFT*= ' '2"THENRETURN 
2532 G0T02525 

2535 G0SUB9522 IFID*0IX*THEN254@ 

2536 PRINT"«DISCO IN LETTURA®DISCO LHVOR 
0":PRINT ' 'PROCEDO(S/N)? ' ' 

2537 GOSIJB6020 I FT*= "S''THEN2540 


2538 60T02515 

2540 PRINT'T3DIRECTGRV DISCO "ND* : PRINT"*) 
a' C*< 1 ); V*< 1 ),W*(l); "«■" 

2545 F0RI=K1T0K'-1 

2550 PRI NT IT AB < 5 ) V* < I > j TAB ( 22 )C*<I),TAB 
<27>W*<: I ) : CF=CF+1 
2555 IFCF=15 0RIMC-1THEN2565 
2560 NEXTI RETURN 

2565 PRINT"«QUALE NUMERO <0=FINE 1=CANCE 
LLA)"; 

2570 INPIJTNX : I FHX=0THENCF=0 : F'R I NT ' 'T ' GDT 
02560 

2575 IFNX=1THEN2640 

2580 IFNX>I OR NX<I-CF+1THENPRINT' 'TTT ' •G 
0T02565 

2585 GOSUB2680 

2590 PRINT“«TITOLO CORRETTO®";: INPUTV* 
2595 IFLEN<V*)>16THENPRINT ' TJ 

TT' :G0T02598 

2597 GO8UB6015 

2600 UPEN15, 8, 15, "R0 : "+V*+" = "+V*<!NX) • CLO 
SEI5-0081166525 


2605 V* (. NX > = V* 

2610 FORI 1 = 1T016 

2615 IFLEN <V*(NX ) > = 11THEN2625 

2620 NEXTII 

2625 FORJ.J®11TOl6 : KU*=KU*+ " NEXTJJ 
2630 V*< NX>=V* < NX) +KU* ; V*<NX)=LEFT$<V*<N 
X),17) 

2635 K1 = I-CF+1 : CF=@ : F'RINT'TJ" ; G0T02545 
2640 INPIJT ' '«!. DA CANCELLARE® ' ' ; NX G0SUB26 
80 

2645 PRINT"«CANCELLO CS/N>?" 

2650 GOSUB6020: IFT*= ' 'N ' 'THENPRINT ' \T ' : GOTO 
2545 

2655 IFT*= ''S''THEN2665 
2660 GOTO2650 

2665 OPEN15,8,15, ”S0 ' +V*<NX>:CLOSE15 :GO 
SUB6525 

2670 V*<NX> = ''*-*" C* <NX>*” 

—"W*<NX>="- 

2675 G0T02635 

2680 PRINT"«TITOLO ATTUALE®"; V*(NX> 

2685 FOR11=1 TO16 : IFMID* < V* ( NX >, 11, 1 > OCH 
R*(32)THEN NN=NN+1-G0T02635 
2690 IFMID* <V* <NX>,11,1>=CHR* <32 > ANDMID* 
<V*<NX>,11+1,1>OCHR*<32)THEN NN=NN+1 
2695 NEXTII 

2700 V*<NX> =LEFT*LV*<NX), NN) : NN=0 RETURN 

3000 REM****************************** 

* * 

3005 REM* LETTURA DIRECTORY DISK * 

* * 

3010 REM****************************** 


30 15 ZZ*= " "+Z1 * < 1 ) : COSI IB5015 : A 

1 = 1 

3020 PRINT"MS N. ETICHETTA DISCO DA LEGO 
ERE=", 

3025 I NPIJT ND* : I FLEN < ND* > >50RND*= ' ' ' 'THENP 
RI NT ' 'TTTTT ' GOTO3020 

3030 PRINT"«MINSERISCI IL DISCO "ND*" PO 
I " : GOSUB6015 : G0SIJB9522 


3031 IFI D*01 X*THEN3035 

3032 PRINT"filiSCO IN LETTURA E IL DISCO 
LAVORO ' ' -PRINT ' 'PROCEDO <S/N)? ' ' 

3033 GOSUB6020:IFT*="S"THEN3@35 

3034 GOTO3015..- _ .. _ 

3035 PRINT''rnWHMHLETTURA DELLA DIRECTORY 
DISCO ''ND* : PRINTUM* 

3040 OPEN1,8,0,”*0 ‘ :K=1 
3045 GET#1,X*,Y* 

3050 GET#1,X*,Y* 

3055 GET#1,X*,Y* 

3060 C=0 

3065 IF X*0"" THEN C=ASCCX*> 

3070 IF V*0"" THEN C=C+ASC<V*>#256 
3075 C*'::K)=MID*<STR*<C), 2) 

3080 IFLEN < C*CK)) = 1THEN C*CK)=C*CK) + " " 

3083 IFC*<1) = ''3527"THENPRINT'‘MDRIVE ERRO 
R" CLOSE1 :GOSUB6025:GOSUB6015 :GOTO3015 
3085 IFLEN<C*CK) j =2'THEN C*<K)=C*<K> + " " 
3090 GET#1, Y* IF STOO THEN 3135 


3095 IF V*OCHR*<34) THEN 3090 

3100 GET#1, V* : IF Y*OCHR*<34) THENV*<K) = 

V* C K)+V*:G0T03100 

3105 GET#1,V* : IF Y*=CHR*<32) THENY*<K)=Y 
* < K ) + Y* ■' G0T03105 
3110 W*="" 

3115 W*=W*+Y* : GET# 1, V* : IF V*0""THEN 311 
5 

3120 W*(K)=LEFT*<W*, 3) 

3125 K=K+1 

3130 IF ST=0 THEN 3050 

3135 BL*=" BLOCCHI UBERI" TD=K-1 

3140 CLOSE1 RETURN 

3500 REM****************************** 

* * 

3505 REM* RICHIAMO FILE DISK * 

* * 

3510 REM****************************** 


3515 ZZ#=" "+Z1$<8)+" LETTERA "+NXf : GOS 

IJE5015 

3520 IF NX$= ''"THENGOSUB3630 
3525 NM$=NX$ 

3530 GO8UE9520 

3535 IF IX*=ID$THEN 3545 

3548 PRINT"WIL DISCO INSERITO E'" ERRATO" 

: GOSUB6015 :GOTO3530 

3545 0PEN5,8,5,"0 : LETTERA "+NM*+",R.R": I 
=0 :NO=@ 

3550 I NPIJT#5, NO G0SUB6515 

3555 IFNO=0THENPRINT"«LETTERA a"NMT"B NU 

OVA SCRITTURH ' ' :GGSUB6015 : RETI IRN 

3560 1=1+1 

3565 INPUT#5,Cl$<I) 

3570 INPIJT#5, Y1 $ < I > 

3575 INPUT#5, Wl$< I "> 

3530 INPUT#5,ND$(I> 

3585 I NPIJT#5, N0$ < I > 

3590 IFI=NO THEN3600 
3595 GOTO3560 
3600 CL0SE5:NZf=NM4•A8=1 
3605 IFXX=1THENXX=0 : GOTO1415 


3610 PRINT"«/UOI IL DISPLAY FILEC"NO"TIT 

OLI)(S/N)?" 

3615 GOSUB6020 IFT*="N' 'THENRETURN 
3620 IFT*="S"THENGOSUB1460•RETURN 
3625 G0T03615 

3630 INPIJT"«INIZIALE TITOLI <0=FINE 1=AL 
TRA DIR)”;NX* : IFNX*= ' '@ ' 'THEN290 
3632 IFNX*="1"THEN DC=0:GOT03S5 
3635 IFLENCNX*)=1THENRETURN 
3640 PRINT"H 

T ' : GOTO3630 

4000 REM***************************+** 

* * 

4005 REM*RICERCA TITOLI FILE IN DISK * 

* * 

4010 REM****************************** 


4015 ZZ#="RICERCA TITOLI LETTERA 3"+NM$+ 
"B DISCO "+NDf GOSUB5015 
4020 PRINT"WW«1B TUTTI I TITOLIPRINT"M 
32B SOLO PROGRAMMI" 


4025 GOSUB6020:IFT$="1"THENRL=1:GOTO4040 

4030 IFT$="2"THEN RL=@:GOTO4040 
4035 GOTO4025 
4040 GOSUB7020:TT=0 
4045 F0RI=2T0TD 

4050 IFLEFT$ < Y$ < I ), 1 ) ONM$THEN4165 
4055 IFRL=0HNDNfCI)O ' 'PRG ' 'THEN4160 
4060 PRINTVT <I)TAB <19 > C* <1>TAB < 24)M*<I)T 
AB <28)NB$ 

4065 F0RJ=1T0N0 
4070 IFYSI )OVl$< J)THEN 4125 
4075 IFC$ < I ) OC 1 * < J ) AND ND* < J ) OND*THEN 
4095 

4080 IFC* < I ) OC 1 * < J ) AND ND* C J ) =ND*THEN 
4100 

4085 IFC*a)=Cl*<J) AND ND* < J ) OND*THEN 
4120 

4090 PRINT";*)IR IH CATALOGO" :G0T04160 
4695 FRINT"SCIA IN CATALOGO CON ALTRO N 
. B E N.D" : GOTO4130 

410@ PRINT'TGIA-' IN CATALOGO CON ALTRO N 
.BLOCK"PRINT' 'SOSTITUISCO < S/N)?" 

4105 GQSUB6020 : IFT*="S"THENC1*<J)=C*<I): 
TT=1 •' GOTO4160 

4110 IFT*="N"THENY*<I) = "":C*<I) = ""'W*a> 
="":G0T04125 

4115 GOTO4105 . _ 

4120 PRINT"SCIA- IN CATALOGO CON ALTRO N 
.D" ; GOTO4130 
4125 NEXTJ 

4130 PRINT"aMEMORIZZO CS/N)?B" 

4135 GQSIJB6020 I FT*= "S ' 'THEN4150 
4140 IFT*="N ' 'THEN4160 
4145 G0T04135 

4150 N0=N0+1 TT=TT+1 

4151 INPUT ' ' SNOTAS' ' ; NO* 
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4152 IFLENCN0$)>33THENG0SUB1150 ; G0T04151 

4153 IFNOf= ' 1 ' 'THENNOf= 

4155 C1 $ < NO ) =Cf C1 ) : V1 * * < NO > =V$ < I > : W1 % < NO ) 
=Wf < I > : NDt ( NO ) =ND$ : NO* < NO ) =NO* 

4160 V$< I : C*< I : Wf < I )«"” 

4165 NEXTI 

4170 IFTT-0THENPRINT' JWESSUN TITOLO DEL 
DISCO "NBf" UTILE" : GOT04175 
4172 GOSUB2025 = TT=0: RETURN 
4175 GOSUB6015 : RETURN 
4500 REM****************************** 

* * 

4505 REM* DISPLAY PER DIRECTORY * 

* * 

4510 REM****************************** 


4515 DC=0:PRINT "UDÌRECTORV DISCO ''ND*''«'' 

: FOR 1=2 TO K 

4520 IF Vf <I>=""THEN4530 

4525 BC=DC+1 

4530 NEXTI 

4535 IFDO0THEN4555 

4540 FRINT"NESSUN TITOLO NELLA DIRECTORY 

' ‘ : DC=0 : GOSUB6015 

4545 IFTT>0THEHGOSUB1025 


4550 GOTO230 

4555 KG=0 ‘ PR I NT " ST 'C$ < 1 > V* < 1 >W* < 1 > 1 '»• ' 

4560 F0RI=2T0K STEF'2 : KG=KG+2 

4565 IFV$< I 'THENF'RINT 1 '*- 

-* "j : G0T04575 

4570 PRINTCf<I)TAB<4)LEFTf<V*<I),13>:" 3 
"LEFT*'W*< I ).. 1 ) "■ 

4575 I F Y* < I +1 ) = ' " 'THENF'R I NT "*- 

-:G0T04585 

4580 PRINTC*<1 + 1>TAB < 24 > LEFTf< V$ <1 + 1>, 13 
?; " STLEFTf < Wf <I +1 >.. 1 ) 

4585 IFKG=40ANDI<KTHENKG=0 : GOSUB6015■PRI 
NT'TT T' 

4590 NEXT I 
4595 RETURN 

5000 REM****************************** 

* * 

5005 REM* DISPLAY CORNICE TESTATE * 

* * 

5010 REM****************************** 


5015 PRINT-n,--- 

5020 PR I NT " I "TAB < 37) " I *' 

5025 PRINT" I ' 'ZZfTAB< 37 ) " I " 

5030 F'RINT" I "TAB <37) " I ” 

5035 F'RINT" 1 --- 

-'"'RETURN 

5500 REM****************************** 
* * 

5505 REM* CHIUSURA DEL PROGRAMMA * 

* * 

5510 REM****************************** 


5515 ZZ$=" CHIUSURA PROGRAMMA" 6 

OSUB5015 

5520 F'RINT "SU PER PROSEGUIRE <FOR ERROP) 
":PRINT"M2 FINE " 

5525 GOSUB6020 

5530 I FTf= " 1 ' 'THENF'R I NT "ZI" : LT=@ ' G0T0235 
5535 IFTf="2"THEN5545 
5540 G0T05525 


5545 F'RIHT-cHHl SALVATO IL. FILE LETTERA 
"NMJ" < S/N >?' ' 

55=10 GOSUB6020 
5555 I FT:f="S ' 'THEN5595 
5560 IFT$="N' 'THEN5570 
5565 GOTO5550 

5570 PRINT "MDEVI SALVARLO <S/N>?" 

5575 GOSl IB6020 

5580 ìFTf= ''S 1 THENGOSUB 2015 GQT05595 
5585 IFTf="N' 'THEN5595 
5590 G0T05575 

5535 PRINT"MDEVI STAMPARE <S/N>?" 

5600 GOSUB6020 

5605 I FTf= "S ' 'THENGOSUB 1415 : GOTO5620 
5610 IFTf="N' 'THEN5620 


5615 GOT05600 

5620 PRINT-1FINE SESSIONE <S/N>?" 

5625 GOSUB6028 

5630 I FT$= "S ' 'THENPRI NT ' 'ITWSNWMWMSMfMWMWflW 
» FINE" END 

5635 IFT*="N"THEN5515 


5640 G0T05625 

6000 REM****************************** 
* + 

6005 REM* SUB PREMI UN TASTO*MENI * * 

* * 

6010 REM****************************** 


6015 FRINT"SPREMI UN TASTO" 

6020 GET T$ : IF T$="" THEN 6020 
6023 CL0SE5 
6025 RETURN 

6500 REM****************************** 
* * 

6505 REM* SUB PER DRIVE IN ERRORE * 
* * 

6510 REM****************************** 


6515 IFNO=0THEN6523 
6520 RETURN 
6523 CL0SE1 

6525 OF'EN 15,8,15"I " : CLOSE15 : RETURN 
7000 REM****************************** 
* * 

7005 REM* SUB PER TESTATA STAMPA V. * 
* * 

701@ REM****************************** 


7015 PEI NT'73" 

7020 F'RI NT"TITOLO''TAB< 1 9 > "N. B'‘TAB<24 > "TI 
P"TAB<28)"N.DM" 

7025 RETURN 

7500 REM****************************** 

* * 

7505 REM*ABBLENCAMENTO VARIABILI DIR.* 

* * 

7510 REM****************************** 


7515 PRINT "3" 

7520 F'R INTUM* : FOR I = 1 TO 150 
7525 V$<I;Cf<I)="" Wf<I>="” 

7530 NEXTI RETURN 

8000 REM****************************** 
* * 


8005 REM*AEBLENCAMENTO VARIABILI CAT.* 
* * 
8010 REM****************************** 


8015 PRINT "ZI 

8020 PRINTUMf:FORI=1TO150 

8025 Y1*<I>="" ; WU<I) = "" : ND*<I)*"":N0$<I 

8030 NEXTI■RETURN 

3500 REM****************************** 

* * 

8505 REM* FORMATTAZIONE DISK LAV. * 

* * 

351@ REM****************************** 


8515 ZZ$= ' ' ' '+Z$ < 5)’ : GOSUB5015 

8520 PRINT"MWIL"Z$<3>" ESISTE <S/N>?" 
8525 GOSUB6020: IFTf=' 'S ' 'THENOOSUB9515 :RET 
IJRN 

8530 IFTi="N"THEN8540 
8535 G0T08525 


8540 ZZ $=" "+Z#<5>:GOSUB5015 

8545 PRINT''««SCRIVI IL NOME DEL DISCO" : P 

RINT"MAX 16 CARATTERI" 

8550 I NF'UT ' 'MN0T1E= "1 DNf 
8555 IFLEN<DNf)>16THENPRINT' TI 

":OOTO8550 

8560 FRI NT "'«INSERÌ SCI LA *ID* < CONSIGLI A 
TA 


8565 INPUT"MID =";ID* 

8570 IFLENCIDf > >2THENPRI NT "H 

":G0T03565 

8575 IDf=IDf+CHRf < 34) 

8580 F'RINT"««INSERISCI IL DISCO DA FORMA 

TTARE POI" : GQSUB6015 

8585 PRINT' 'I3MMMMW''Z$<5> : FRINTIJMJ 

3590 OPEN 15,8.15, "N0 : "+DNJ+", "+IDf 

8595 CLOSE15 :G0SUB9522'FD=1 : RETURN 

9000 REM****************************** 

* * 

9005 REM* ISTRUZIONI * 

* * 

9010 REM****************************** 


9015 PRINT"IXATALOGO DISCHI ": IS=1 
9020 PRINT"MMCON QUESTO PROGRAMMA E' POS 
SIBILE CREA-" 

9025 PRINT''RE UNA RUBRICA ALFABETICA DI 
TUTTI I" 

9030 PRINT”FILES REGISTRATI SUI DISCHI 
DI LAVORO.” 

9035 F'RINT"SE NECESSARIO INSERIRE L ESA 
TTA IDENTI-" 

9040 PRINT"FICAZIONE DEL DISCO DAL QUALE 
VERRO‘ ' ' 

9045 FRI NT "LETTA LA DIRECTORY PENA L "' ERR 
ATA" 

9050 FRINT"CLASSIFICAZIONE DEI FILES STE 
SSI. ■■■ 

9055 F'RINT »E PREVISTA LA POSSIBILITft'D 
I MEMORIZ-" 

9066 PRINT"ZARE SOLO I TITOLI DESIDERATI 
: QUESTO" 


9065 FRINT"PERCHE' ALCUNI PROGRAMMI SONO 
COMPOSTI" 

9070 PRINT"DA PIU' FILES DEI QUALI SOLO 
UNO E' " 

9075 FRINT"UTILE PER LA CATALOGAZIONE." 
9080 GOSUB6015 

9085 PRINTTRE' OPPORTUNO CREARE UN DISC 
0 CATALOGO" 

9090 PRINT "CON UNA ID NON COMUNE AD ALTR 
I PERCHE" 

9095 PRINT"QUESTA VERRÀ LETTA AD INIZIO 
PROGRAMMA" 

9100 PRINT"E CON ESSA SARA' GESTITO SOLO 
QUEL" 

9105 PRINT"PARTICOLARE FLOPPY-DISK." 

9110 PRINT"MNEL CORSO DEL PROGRAMMA VERE: 
ANNO PRO-" 

9115 FRINT"POSTE MOLTE LISTE DI LAVORO 
CHE" 

9120 FRINT"COMPLETERANNO LE ISTRUZIONI. 
BUON LAVORO!" 


9125 GOSUB6015 :GOSUB5015 RETURN 
9500 REM****************************** 

* * 

9505 REM* RICONOSCIMENTO ID DISK LAV.* 

* * 

9510 REM****************************** 

9515 ZZ$-' ' ' ’+Z $< 6 ) +Zf <3 > : GOSUB5015 

9520 FRINT"«INSERÌSCI IL "Zf<3>" PUI"-G0 
SUB6015 

9522 OPEN1,8,0,"f0" : IDf="" 

9525 GET# 1, Xf, Y$ 

9530 GET#1,Xf,V# 

9535 GET#1,Xf,V$ 

9540 C=0 

9545 IF XfO"" THEN C=ASC<X*> 

9550 IF VfO"" THEN C=C+RSC<Y*>*256 
9555 GET# 1 j Yf : IF STO0 THEN 9590 
9560 IF YfOCHRf<34> THEN 9555 
9565 GET#1, Y$ : IF VfOCHRf <34> THEN9565 
9570 GET#1,Yf IF V#=CHRf <32) THEN9570 
9575 W$="" 

9580 Wf=W$+V$ : GET#1, Y$ : IF YfO"" THEN 9 
580 

9585 IDf=LEFT$<Uf,3> 

9590 CLOSE1 RETURN 
READY. 
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AFFINITÀ DI COPPIA 


QUESTO PROGRAMMA È DISPONIBILE SU CASSETTA 0 DISCO PRESSO 
LA REDAZIONE. PER LE ISTRUZIONI DI ACQUISTO CONSUL TA TE LA 
PAGINA DI APERTURA DELLA SEZIONE PROGRAMMI. 


Il gioco dell’amore: tutto quello che 
avreste voluto sapere su voi ed il 
vostro partner, ma che non avete mai 
osato... conoscere! 



Il programma permette l’ana¬ 
lisi dell’affinità di coppia ba¬ 
sata sui cicli bioritmici e sui 
segni zodiacali. 

La teoria del bioritmo è orga¬ 
nizzata su tre processi fonda- 
mentali con i quali si ritiene si 


susseguano i principali atti vi¬ 
tali del nostro corpo. 

La vita di ogni essere umano 
è quindi influenzata da cicli 
routinari ripetitivi che riguar¬ 
dano il fisico, l’emotività e la 
mente. 

I tre processi iniziano al mo¬ 
mento della nascita dell’indi¬ 
viduo e durano: 

CICLO FISICO 23 giorni: inte¬ 
ressa essenzialmente il be¬ 
nessere (o malessere) del no¬ 
stro corpo; 

CICLO EMOTIVO 28 giorni: 
interessa essenzialmente il 
nostro stato d’animo, il nostro 


umore quotidiano; 

CICLO MENTALE 33 giorni: 
regola la nostra prontezza di 
riflessi, la ricettività, insomma 
il nostro stato intellettivo. 

Secondo la teoria dei bioritmi 
i nostri alti e bassi quotidiani 
sono causati proprio dal pun¬ 
to d’incontro dei tre diagram¬ 
mi ciclici che vengono svilup¬ 
pati considerando, quali para¬ 
metri, il giorno di nascita ed il 
giorno (o periodo) di nostro 
interesse. 

Sfruttando tale teoria è stato 
possibile rapportare i tre cicli 
succitati alla differenza in 


giorni intercorrente tra le date 
di nascita di due persone. 
Tale differenza viene utilizza¬ 
ta per risalire all’affinità di ca¬ 
rattere e quindi, nella fattispe¬ 
cie del nostro programma, 
alla compatibilità di coppia. 
Oltre questa analisi, viene ge¬ 
stita quella relativa all’affinità 
sui segni zodiacali. La teoria 
sullo zodiaco non è certo più 
semplice di quella sui biorit¬ 
mi, ma nel programma il pro¬ 
cesso zodiacale è limitato alla 
ricerca dei segni relativi ai 
due soggetti analizzati e suc¬ 
cessiva analisi di coppia. I ri¬ 
sultati analitici delle due teo- 


ELENCO PRINCIPALI VARIABILI 


VARIABILI INDICIZZATE 

MM successione giorni da inizio anno ad inizio singolo mese. 
VARIABILI NUMERICHE 


CD 



CF 

CG 


percentuale affinità mentale 
percentuale media bioritmo 

percentuale coppia zodiaco 
percentuale media bioritmo/zodiaco 



mem.ne POKE Titolo 
mem.ne POKE Musica 

note musicali introduzione 
note sottofondo musicale, 
dati anagrafici uomo 

dati anagrafici donna 
calcolo giorni cal. perpetuo 

differenza giorni nascita coppia 
percentuale affinità fisica 
percentuale affinità emotiva 


VARIABILI STRINGA 


D1$\ 
X1SJ 
D2$\ 
X2$j 

D3$T 
X3$ J 

D4$\ 
X4 $ J 
X5$ 
X6$ 

DOS 

SX$ 

SIS 

S2$ 

GIS 

GUS 

GDS 

GGS 

GHS 

GF$ 


definizione affinità fisica 
definizione affinità emotiva 
definizione affinità mentale 

definizione media bioritmo 

definizione coppia zodiaco 

definizione media bioritmo/zodiaco UOS = nome 

uomo 

nome donna 

ricerca nominativa zodiaco 
zodiaco uomo 
zodiaco donna 
ricerca nome mese 
nome mese uomo 
nome mese donna 
ricerca nome giorno 
nome giorno uomo 
nome giorno donna 
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rie possono dare valori abba¬ 
stanza contrastanti: può veri¬ 
ficarsi il caso che una coppia 
risulti ben “costituita” per i 


bioritmi, ma disomogenea per 
lo zodiaco, o viceversa, per¬ 
ché le due teorie non hanno 
nessun concetto in comune. 


Comunque la pretesa di que¬ 
sto programma, al di là della 
serietà delle due teorie, è 
solo quella, se possibile, di 


creare curiosità intorno alia 
“coppia” e di suscitare qual¬ 
che sorrisetto con le diagnosi 
finali. 


ANALISI DEL PROGRAMMA 


100-530 Presentazione video con sottofondo musicale. 

280-388 Titolo del Programma con lettere giganti (ridefinizione 
rom). 

390-442 Sottofondo musicale con il motivo “ANEMA E 
CORE”. 

570 Dimensionamento del vettore per la memorizzazione 

della somma dei giorni dall’inizio dell’anno fino all’ini¬ 
zio del mese di nascita. 

580-620 Inizializzazione del vettore per la successiva ricerca 
dei giorni di differenza tra le date di nascita della cop¬ 
pia. 

630-750 Routine per l’inserimento dei dati anagrafici dell’uo¬ 
mo, con ricerca nome-giorno di nascita e segno zo¬ 
diaco. 

760-880 Routine per l’inserimento dei dati anagrafici della 
donna, con ricerca nome-giorno di nascita e segno 
zodiaco. 

890-1130 Visualizzazione dei dati anagrafici della coppia, con 
indicazione di nome, giorno, segno zodiacale e diffe¬ 
renza d’età espressa in giorni (parametro utilizzato 
per la definizione dei cicli bioritmici). 

1150-1300 Calcolo dei cicli bioritmici in base alla differenza in 
giorni della coppia. 

1320-1520 Routine che gestisce la ricerca dei parametri per la 
successiva individuazione del nome-giorno e del 
nome-mese di nascita (calendario perpetuo). 

1530-1900 Routine per la ricerca del nome-mese di nascita delle 
due persone in analisi. 

1910-2130 Routine per ia ricerca del nome-giorno di nascita del¬ 
le due persone in analisi. 

2140-2300 Costruzione deH’istogramma relativo al ciclo fisico e 
ricerca, in base al suo valore percentuale, della con¬ 
seguente definizione. 

2310-2460 Costruzione deH’istogramma relativo al ciclo emotivo 
e ricerca, in base al suo valore percentuale, della 
conseguente definizione. 

2470-2620 Costruzione deM’istogramma relativo al ciclo intelletti¬ 


vo e ricerca, in base al suo valore percentuale, della 
conseguente definizione. 

2630-2780 Costruzione deH’istogramma relativo alla media dei 
tre cicli del bioritmo e ricerca, in base al suo valore 
percentuale, della conseguente definizione. 

2790-2870 Costruzione deH’istogramma relativo alla coppia-zo¬ 
diaco e ricerca, in base al suo valore percentuale del¬ 
la conseguente definizione. 

2880-3020 Costruzione deH’istogramma relativo alla media fina¬ 
le, ricavato dalla media dei tre cicli del bioritmo e 
dalla media della coppia zodiaco, con ricerca, anche 
in questo caso, della conseguente definizione. 

3030-3090 Routine finale per stampa dell’analisi effettuata e/o 
richiesta altra analisi/fine programma. 

3270-3430 Subroutine utilizzata per la ricerca della definizione 
riguardante il ciclo emotivo, in base al valore dell’isto- 
gramma relativo. 

3440-3600 Subroutine utilizzata per la ricerca della definizione 
riguardante il ciclo mentale, in base al valore dell’isto- 
gramma relativo. 

3610-3770 Subroutine utilizzata per la ricerca della definizione 
riguardante la media dei tre cicli, in base al valore 
deH’istogramma relativo. 

3780-4190 Subroutine di stampa dell'analisi completa. 

4200-4310 Subroutine per il motivetto musicale di sottofondo 
che accompagna ie singole schermate. 

4320-4600 Subroutine per la ricerca del segno zodiacale delle 
due persone in esame. 

4610-4890 Subroutine utilizzata per la ricerca della definizione 
riguardante la coppia zodiaco, in base al valore dello 
istogramma relativo. 

4900-4990 Inizializzazione della variabile per la composizione 
deH’istogramma relativo alla media zodiaco con con¬ 
seguente definizione. 

5000-5230 Subroutine per l’inserimento dei dati anagrafici inizia¬ 
li con controllo della validità dei dati stessi. 

5240-5260 Routine Get e premi un tasto. 



STRUTTURA DEL PROGRAMMA 

100-530 

Presentazione video. 

2630-2780 

Istogramma della media dei tre cicli del bioritmo e 

280-388 

Titolo del programma. 


ricerca della definizione relativa. 

390-442 

Sottofondo musicale. 

2790-2870 

Istogramma coppia-zodiaco e ricerca della definizio- 

570 

Dimensionamento vettore MM. 


ne relativa 

580-620 

Inizializzazione del vettore MM. 

2880-3020 

Istogramma della media finale (bioritmo/coppia zodia- 

630-750 

Routine inserimento dati anagrafici dell’uomo. 


co) e ricerca della definizione relativa. 

760-880 

Routine inserimento dati anagrafici della donna. 

3030-3090 

Routine finale per chiusura programma. 

890-1130 

Visualizzazione parametri anagrafici della coppia. 

3100-3260 

Definizioni ciclo fisico. 

1150-1300 

Calcolo cicli bioritmici. 

3270-3430 

Definizioni ciclo emotivo. 

1320-1520 

Routine per la individuazione del nome-giorno e del 

3440-3600 

Definizioni ciclo intellettivo. 


nome-mese di nascita (calendario perpetuo). 

3610-3770 

Definizioni media dei tre cicli. 

1530-1900 

Routine per la ricerca del nome-mese di nascita. 

3780-4190 

Routine di stampa. 

1910-2130 

Routine per la ricerca del nome-giorno di nascita. 

4200-4310 

Motivo musicale di sottofondo. 

2140-2300 

Istogramma ciclo fisico e ricerca della definizione re- 

4320-4600 

Ricerca segni zodiacali. 


lativa. 

4610-4890 

Ricerca definizioni coppia zodiaco. 

2310-2460 

Istogramma ciclo emotivo e ricerca della definizione 
relativa. 

4900-4990 

Composizione istogramma media zodiaco e sua defi¬ 
nizione. 

2470-2620 

Istogramma ciclo intellettivo e ricerca della definizio- 

5000-5230 

Routine inserimento dati anagrafici iniziali. 


ne relativa. 

5240-5260 

Routine Get e Premi un tasto. 


100 REM «i#****##*****#*»#!»#**#******#*# 120 REM ** 

110 REM ** AFFINITÀ' DI COPPI6 ** 130 REM ** 


DI CARLO EHIO 1986 


** 


140 REM «* 
150 REM #* 


** 

** 


44 


LIST 4 















168 REM ** COMMODORE 64/STAMPANTE MPS ** 
170 REM ** #* 

180 REM ******************************** 
190 REM 

200 REM #iM#*#iM##*#****##*#** 

210 REM ** COLORE SCHERMO ** 


220 REM ********************** 

230 PQKE53280,5 :P0KE53281,5 :PRINT"■' 1 
240 REM 

250 REM ********************** 

260 REM ** PRESENTASIONE ** 

270 REM ********************** 

280 PRINT" POKE53280,5•P0KE53281,5 
282 KS=0 : FORJ=688TQ703'REHDKK:KS=KS+KK:P 
OKE J , KK ■' NEXT 

284 IFKSO3078THENPRI NT "ERRORE NELLE 1ST 
RU2I0NI DATA":END 

286 KS=0 : FORJ=328T01006 : READKK : KS=KS+KK : 
POKEJ,KK:NEXT 

288 IFKSO20306THENPRINT' ERRORE NELLE IS 
TRUZIONI DATA" END 
290 POKE249,0 

292 DATA32,188,190,226,172,225,191,251 
294 DATA187,255,161,236,162,254,252,96 
296 DATA169,208,133,004,173,024 
298 DATA208,041,002,240,004,169 
300 DATA216,133,004,169,000,162 


302 DATA003,006,250,042,202,208 
304 DATA250,024,101,004,133,004 
306 DATA165,250,133,003,173,014 
308 DATA220,041,254,141, 0 14,220 
310 DATA165,001,041,251,133,001 
312 DATA169,000,133,250,169,005 
314 DATA133,002,160,000,177,003 
316 DATA133,005,230,003,177,003 
318 DATA133,006,230,003,198,002 
320 DATA240,028,162,004,169,000 
322 DATA006,006,042,006,006,042 
324'DATA006,005,042,006,005,042 
326 DATA164,250,153,048,002,230 
328 DATA250,202,208,232,240,210 
330 DATA165,001,009,004,133,001 
332 DATA173,014,220,009,001,141 
334 DATA014,220,160,000,166,249 
336 DATA240,008,169 
338 DATA029 
340 DATA032,210 

342 DATA255,202,208,250,169,004 

344 DATAI33,006,185,048,002,170 

346 DATA189,176,002,133,005,041 

348 DATA064,240,005,169,018,032 

350 DATA210,255,165,005,041,191 

352 DATA032,210,255,169,146,032 

354 DATA210,255,200,198,006,208 

356 DATA221,169,013,032,210,255 

358 DATA192,016,208,196,096 

360 PRINT'TWS":P0KE249,1 :POKE250,1•SVS82 

8 ■ PRINT'"TIT UT' : P0KE249,6 : POKE250,6 

362 SVS828 F'R I NT ' "11111T ' : P0KE249,10 : POPE 

250,6 : SVS828 

364 PR I NT • '.TUTTI ' ^ P0KE249,14 = POKE250,9 : S 
VS828 

366 PR I NT ' TTTTTTT ' : P0KE249, 18 : POKE250,14' 
SVS828 

368 PR I NT ‘ •TTTTTTT ' : P0KE249, 22 : POKE250, 9 : S 
VS828 

370 PR I NT l 'TTTTTTT ' : P0KE249,26: POKE250,20 : 
SVS828 

372 PR I NT ' TIT HIT ' : P0KE249,30 : POKE250,1 : S 
VS828 

374 PR I NT ' 'TTTTTTT ' : P0KE249,34 : POKE250, 39 : 
SVS828 

376 PRINT''MflBS'': P0KE249,14' POKE250,4- SVS 
828 : PRINT'-TTm" : P0KE249, 18 : P0KE250,9 
378 SVS828 

380 PRINT ' Mina' ' P0KE249,6 :POKE250,3 
382 SVS828 ■ PR I NT ' 'TTTTTT ■ P0KE249,10- P0KE2 
50, 15 ■ SVS828 ■ PRINT "Tim" 

384 P0KE249,14 POKE250,16-SVS828:PRINT"H 

TTTT ' : P0KE249,18 : POKE250,16 

386 SVS828 ■ PR I NT ' 'TTTTTT ' : POKE249,22P0KE2 


50, 9 : SVS828 : PRINT-TTm" 

388 P0KE249,26■POKE250,1 :SVS828 
390 F0RR=54272T054296: POKER,0 :NEXT 
392 P0KE54278,240 :P0KE54296,15 
394 DATA 30,21,100,30,21,100,142,12,100, 
142,12,100,142,12,100,142,12,100,24,14 
396 DATA 100,195,16,100,210,15,100,24,14 
,100,24,14,600,95,22,100,95,22,100 
398 DATA 24,14,100,24,14,100,24,14,100,2 
4,14,100,210,15,100,208,18,100,210,15 


400 DATA 100,24,14,100,142,12,600,30,21, 

100,30 21,100,142,12,100,142,12,100,142 

402 DATA 12,100,142,12,100,24,14,100,210 

,15,100,195,16,100,210,15,100 

404 DATA 208,18,600,208,18,100,195,16,10 

0,210,15,100,208,18,600 

406 DATA 195,16,100,210,15,100,195,16,10 

0,210,15,600,24,14,100,195,16,100 

408 DATA 210,15,100,208,18,600,30,21,100 

,30,21,100,142,12,100 

410 DATA 142,12,100,142,12,100,142,12,10 

0,24,14,100,195,16,100 

412 DATA 210,15,100,24,14,100,24,14,600, 

95.22.100.95.22.100 

414 DATA 24,14,100,24,14,100,24,14,100,2 

4.14.100.210.15.100.195.16.100 

416 DATA 208,13,100,29,25,100,29,25,600, 

29.25.100.29.25.100.95.22.100.95.22.100 
418 DATA 30,21,100,30,21,100,30,21,100,2 
08,18,100,30,21,100,95,22,100 

420 DATA 95,22,600,95,22,100,30,21,100,1 

42.12.100.142.12.100.142.12.100 

422 DATA 142,12,100,210,15,100,195,16,10 

0,208,18,100,30,21,100,208,18,100 

424 DATA 195,16,1000,999,999,999,999 

426 READ A,B,C 

428 IF A=999THEN442 

430 P0KE54272,A :PQKE54273,B 

432 P0KE54276,17 

434 FOR R=0TQ C : NEXT 

436 POKE 54276,16 

438 FORR=0TO100•'NEXT 

440 GOTO 424 

442 FOR R=54272T0 54296:POKE R,0:NEXT 
490 PRINTTAB<7)"3iroaBMas ANALIS 

I DELL'AFFINITÀ'"' 

500 PRINTTAB<7> "» DI CARATTERE TRA COF'P 
IE " 

510 PRINTTABC5)"«DETERMINATA DAI CICLI B 
IORITMICI" 

520 PRINTTAB<5)"» E DAI SEGNI DELLO 20 
DIACO" 

530 F0RJ=1TO20:GOSUB4230:NEXTJ 


540 REM ***************************** 

550 REM ** MEM.NE GG DA INIZIO ANNO** 

** A INIZIO SINGOLO MESE ** 

560 REM ***************************** 

570 DIMMM<12) 

580 MM<1)=0:MM<2>=31 : MM<3>=59:MM<4>=9@:M 
M(5)=120MM<6>=151 

590 MM(7)=181 : MM<8>=212 ■' MM<9)=243 : MM< 10) 
=273 : MM(11>=304 :MMC12>=334 

630 REM ***************************** 

640 REM ** INSERIMENTO DATI UOMO ** 

650 REM ***************************** 

660 PRINT'TDHH» UOMO COME TI CHIAMI"; ; INP 
LITUO* 

670 PRINT"M",'TAB<10>UO*:PRINT"MSCRIVI LA 
TUA DATA DI NASCITHIBWM" 

680 GOSUB503O 

690 GOSUB4350:S1 *=SX*:KU=KX 

700 EU=M 

710 FI !=D 

720 GU=V 

730 GOSUB1350 

740 KM=T 

750 K0=RM+1 

760 REM ***************************** 

770 REM ** INSERIMENTO DATI DONNA ** 

780 REM ***************************** 

790 PRINT"ZWM« DONNA COME TI CHIAMI”.: : IN 
PIJTDO* 

800 PRINT"»";TABC10>DO* : FRI NT "SCRIVI LA 
TUA DATA DI NASCITA»»»»" 

810 GOSUB5S30 



820 GOSUB4350:S2$=SX$ KD=KX : GOSUB4640 

830 ED=M 

840 DD=D 

850 GD=V 

860 GOSUB1350 

870 DG=ABS(KM-T> 

880 KF=RM+1 

890 REM ****************************** 
900 REM *# ANALISI G.NO NAS./ZODIACO** 
910 REM ****************************** 
920 PR INTANALI SI DELL'AFFINITÀ"" 

930 PRINT"MODI ";IJ0*.:” E "; DO* ' FORJ=1T01 

0 :GOSUB4230:NEXTJ 

940 PRINT".»» "JUO*" E" NATO IL " 

950 M=EU : PRINTFLU 
960 GOSUB1560:GU*=GI* 

970 PRINT" ''.;GU *i '' ";GU 
980 PRINT" ERA DI 
990 RM=KO 

1000 GOSUB1940 :GH*=GG* 

1010 PRINTGHiU"." 

1020 PRINT"» SEGNO ZODIACALE-; 1 'USI* 

1030 PRINT"» "i DO*.: " E" NATA IL" 

1040 M=ED : PRINTDD: 

1050 GOSUB1560 : GD*=GI* 

1060 PRINT" ".: GD»; " ".: GD 
1070 PRINT" ERA DI "; 

1080 RM=KF 

1090 GOSUB1940 GF*=GG* 

1100 PRINTGF*;"." 

1110 PRINT"» SEGNO ZODIACALE-> ";S2* 


1120 PRINT"MCI SONO ";DG;" GIORNI DI DIF 
FERENZA" :PRINT"TRA ";U0*.:" E ":D0* 

1130 PRINT"- 


1140 GOSUB5240 

1150 REM ****************************** 

1160 REM ** CALCOLO CICLI BIORITMO SU** 
** DIFFERENZA GIORNI NASCITA** 
1170 REM ****************************** 
1180 Z=DG 

1190 P3=ABS(INT < C < Z/23 >-1NT C Z/23 > > *23 > > 
1200 S3=ABS < 1 NT < C < Z/28 ) -1 NT < Z/28 > > *28 > > 
1210 CC=ABS(INT<(<Z/33>-INT<Z/33>)*33>) 
1228 P5=ABS(100-CC 2*P3 > *(100/23 > > > 

1230 S5=ABS<100-<<2*S3 > * <100/28 > > > 

1240 CE=ABSO 00-(< 2*CC > * a 00/33 > > > 

1250 CA=INT(P5*10>/10 
1260 CB=INT < S5*10 >/10 
1270 CD=INT<CE*10>/10 
1280 A5=<P5+S5+CE>/3 
1290 CE=INT<A5*10>/10 


1300 CG=INT<(CE+CF>/2> 

1310 GOTO2170 

1320 REM ****************************** 
1330 REM ** CALCOLO DIFFERENZA GIORNI** 
** NASCITA COPPIA BIORITMO ** 
1340 REM ****************************** 
1350 A1=V-1800 
1360 A2=INT<Al/4) 

1370 A3=INT<A2/25> 

1380 A4=INT<(Al+200>/400> 

1390 K=0 

1400 IFA2*4<>A1THEN1440 
1410 IFA3*100OA1 THEN 1440 
1420 IFA4*400-200OA1THEN1440 
1430 K=1 

1440 T=365*A1+A2-A3+A4-K 
1450 T=T+MM<M>+D-1 
1460 IFM<3THEN1480 
1470 T=T+K 

1480 IFINT<A1/4>OA1/4THEN1510 
1490 IFM>2THEN1510 

1500 T=T-1 

1510 RM=T-7*INT<T/7> 

1520 RETURN 

153@ REM *********************** 

1540 REM ** RICERCA NOME MESE ** 

1550 REM *********************** 

1560 IFMOl THEN 1590 
1570 GI*="GENNAIO" 

1580 RETURN 

1590 IFMO2THEN1620 

1600 Gl*="FEBBRAIO" 
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1610 RETURN 

1620 1FMO3THEN1650 

1630 Gli="MARZO" 

1640 RETURN 

1650 IFMO4THEN1680 

1660 Gl$="APRILE" 

1670 RETURN 

1680 IFM05THEN1710 

1690 GI*= "MAGGIO" 

1700 RETURN 


1710 IFMO6THEN1740 
1720 GI*="GIUGNO" 

1730 RETURN 

1740 IFM07THEN1770 

1750 GI*= "LUGLIO" 

1760 RETURN 

1770 IFMO8THEN1800 

1780 GI*= "AGOSTO" 

1790 RETURN 

1800 IFM09THEN1830 

1810 GI*="SETTEMBRE" 

1820 RETURN 

1830 IFMO10THEN1860 

1840 GI*="OTTOBRE" 

1850 RETURN 

1860 IFMO11THEN1890 

1870 GI*="NOVEMBRE" 

1880 RETURN 

1890 GI$="DICEMBRE" 

1900 RETURN 

1910 REM ************************* 


1920 REM ** RICERCA NOME GIORNO ** 

1930 REM ************************* 

1940 IFRMOlTHEN1970 
1950 GG*= "MERCOLEDÌ" 

I960 RETURN 

1970 IFRMO2THEN2000 

1980 GG$="GIOVEDÌ'" 

1990 RETURN 

2000 IFRM>3THEN2030 

2010 GG*="VENERDÌ'" 

2020 RETURN 

2030 IFRMO4THEN2060 

2040 GGÌ="SABATO" 

2050 RETURN 

2060 IFRMO5THEN2090 

2070 GG$="DOMENICA" 

2080 RETURN 

2090 IFRMO6THEN2120 

2100 GG$="LUNEDI ' " 

2110 RETURN 

2120 GG$="MARTEDÌ'" 

2130 RETURN 

2140 rem ***************************** 
2150 REM ** RICERCA DEFINIZIONE E ** 
** ISTOGRAMMA CICLO FISICO #* 

2160 rem ***************************** 

2170 IFCA>=90THEN3130 

2180 IFCA>=75THEN3150 

2190 IFCA>=60THEN3170 

2200 IFCA>=45THEN3190 

2210 IFCA>=30THEN3210 

2220 IFCA>=15THEN3230 

2230 GOTG3250 

2240 PRINT'TI ANALISI 

FINALE" : FORJ=1TO10 GOSUB4230 : NEXTJ 
2250 PRINT'TIMWroS AFFINITÀ- FISICA»" 
2260 FOR J= 1T05 : GOSUB4230 : NEXTJ 
2270 FORI=1TOCA/3 : PRINT"::NEXTI 
2280 PRINTTAB(32XCA; "X" 

2290 PR I NT 1 'jSIIB' 'D1 $ : PR INTX1 $ 

2300 GOSIJB5240 

2310 REM ***************************** 
2320 REM ** RICERCA DEFINIZIONE E ** 
** ISTOGRAMMA CICLO EMOTIVO** 


2330 REM ***************************** 

2340 IFCB>=90THEN33@0 

2350 IFCB>=75THEN3320 

2360 IFCB>=60THEN3340 

2370 IFCB>=45THEN3360 


2380 IFCB>=30THEN3380 
2390 IFCB>=15THEN3400 
2400 GOTO3420 

2410 PRINT"n*HWK AFFINITÀ' EMOTIVA»' 
2420 FORJ=lT05:GOSUB4230:NEXTJ 
2430 FORI=1TOCB/3 PRINT"*".; ■NEXTI 
2440 PRINTTABC32XCB,"X" 

2450 PRINT"MSIW "D2* : PRINTX2* 

2460 GOSUB5240 

2470 REM ***************************** 
2480 REM ** RICERCA DEFINIZIONE E ** 
** ISTOGRAMMA CICLO MENTALE** 
2490 REM ***************************** 
2500 IFCB>=90THEN3470 
2510 IFCD>=75THEN3490 
2520 IFCD>=60THEN3510 


2530 IFCD>=45THEN3530 
2540 IFCD>=30THEN3550 
2550 IFCD>=15THEN3570 
2560 GOTO3590 

2570 PRINT'TMMH» AFFINITÀ" MENTALE»' 
2580 FORJ=1T05:GOSUB4230:NEXTJ 
2590 FORI = 1TOCD/3:PRINT"*"; :NEXTI 
2600 PR INTTAB < 32 > CD; ' 7. ' ' 

2610 PRINT"MlM"D3* •' PRINTX3* 

2620 GOSUB5240 

2630 REM ***************************** 
2640 REM ** RICERCA DEFINIZIONE E ** 
** ISTOGRAMMA MEDIA BIORITMO* 
2650 REM ***************************** 
2660 IFCE>=90THEN3640 
2670 IFCE>=75THEN3660 
2680 IFCE>=60THEN3680 
2690 IFCE>=45THEN3700 
2700 IFCE>=30THEN3720 
2710 IFCE>=15THEN3740 
2720 GOTO3760 

2730 PRINT"raWWIS MEDIA BIORITMI.»" 
2740 F0RJ=1T05:GOSUB4230 : NEXTJ 
2750 FORI = 1TOCE/3 PRINT"*"; :NEXTI 
2760 PR INTTAB ( 32 > CE' 7. ' ' 

2770 PRINT"SWW"B4* F'RINTX4$ 

2780 GOSUB5240 

2790 REM ***************************** 
2800 REM ** ISTOGRAMMA E DEFINIZIONE** 
** COPPIA ZODIACO ** 

2810 REM ***************************** 

2820 PRINT’ TMSlWSCOPPIA ZODIACO ";S1*.;'V 
"S2*"»" 

2830 FORJ=1T05:GOSUB4230:NEXTJ 
2840 F0RI=lT0CF/3 : PRINT"*"j:NEXT 
2850 PRINTTAB(32 X CF,' 7 ' ' 

2860 PRINT"»»»"X5* 

2870 GOSUB5240 

2880 REM ***************************** 
2890 REM ** RICERCA DEFINIZIONE E ** 

** ISTOGRAMMA MEDIA FINALE** 
2900 REM ***************************** 
2910 PRINTrunaW MEDIA bioritmi/zodi 
ACOM" 


2920 FORJ=1T05 : GOSUB4230:NEXTJ 
2930 F0RI=lT0CG/3 ; PAINT"#"; NEXTI 
2940 PRINTTABC32XCG;"M" 

2950 IFCG>=90THENX6*= ' 'ANI ME GEMELLE ' ' GOT 
03020 

2960 IFCG>=75THENX6*="VITA INTENSAMENTE 
FELICE'" GQTO3020 

2970 IFCG>=60THENX6*="OTTIME POSSIBILITÀ 
r D'INTESA" : GOTO3020 

2980 IFCG>=45THENX6$="UNI0NE DISCRETA MA 
CON POCHI STIMOLI'"GOTO3020 
2990 IFCG>=30THENX6*= "POCO EQUILIBRIO..PO 
CO AMORE"GOTO3020 

3000 IFCG>=15THENX6$="FELICI INSIEME..PE 
R UN BEL WEEK-END'"GOTO3020 
3010 IFCG<15THEN X6*="N0N PIJO' L'ACQUA S 
POSARE IL FUOCO!" 

3020 PRINT"M«S"X6* 

3030 PRINT'MIWnPREHI :S=STAMPA":PRINT" 
A=ALTRA ANALISI” 

3040 PRINT" F=FINE" 


3050 GOSUB5250 

3060 IFWV*="S"THENGOSIJB3810 PRINT "ITI NE 

STAMPAMI!»' ' : GOTO3030 

3070 IFWVÌ="A"THEN660 

3080 IFWV$="F"THENEND 

3090 GOTO3050 

3100 REM ***************************** 
3110 REM ** DEFINIZIONI CICLO FISICO** 
3120 REM ***************************** 
3130 D1*="N0N POTRESTE SPERARE DI MEGLIO 

3140 X1$="LA VOSTRA UNIONE FISICA E' PER 
FETTA!!":GOTO2240 

3150 Dl*="STARE INSIEME PER VOI E' IMPOR 
TANTE." 

3160 X1f=''NON POTETE FARE A MENO L'UNO D 
ELL"ALTRO.":GOTO2240 

3170 Dl*="LONTANI DAL PARTNER NON RESIST 
ETE! " 

3180 X1$="E' PIACEVOLE PER VOI STARE INS 
IEME." : GOTO2240 

3190 DI**"INSIEME STATE BENE MA QUALCHE 
VOLTA" 

3200 Xl*="PREFERITE RIMANERE DA SOLI."G 
OTO2240 

3210 D1*="N0N VOLETE PRIVARVI DELLA COMP 
AGNIA" 

3220 XI $= "DELL'ALTRO. MA SOLI...STATE ME 
OLIO." ; GOTQ2240 

3230 D1*="LA COMPAGNIA DELL'ALTRO NON E' 

3240 XIf="SEMPRE DI PRIMARIA IMPORTANZA" 
:GOTO2240 

3250 D1*="LA COMPAGNIA DEL PARTNER NON E 

3260 X1*="TA. STATE MOLTO MEGLIO SOLI 0 
CON AMICI.":QOTO2240 

3270 REM ****************************** 
3280 REM ** DEFINIZIONI CICLO EMOTIVO** 
3290 REM ****************************** 
3300 B2*=”VI COMPRENDETE PERFETTAMENTE!! 


3310 X2*="TRA VOI E' TUTTO CHIARO CON UN 
0 SGUARDO.":G0T02410 

3320 D2*="PER COMPRENDERVI NON AVETE BIS 
OGNO" 

3330 X2*="DI TROPPE PAROLE! =GOTO1980 
3340 D2*="SINCERITA' , LEALTÀ' E RISPETTO 

VI” 

3350 X2*="CONSENTONO UNA BUONA INTESA!": 
GOTO2410 

3360 D2*="QUALCHE SFORZO.. MA ALLA FINE" 

3370 D2*="RIUSCITE A CAPIRVI DECISAMENTE 
BENE.":GOTO2410 

3380 B2$="IL CAPIRVI E' UN ASPETTO CHE D 
OVETE" 

3390 X2*="CONSIDERARE CON UN PO' DI...CA 
LMA" : GOTO2410 

3400 D2*="SIETE OLTREMODO EGOISTI : SPERAR 
E DI" 

3410 X2$="CAPIRVI DIVENTA IMPOSSIBILE.": 
GOTO2410 


3420 B2*=‘'SENTIMENTI TRA VOI...NESSUNO ! 
VI INTE-" 

3430 X2*="RESTANO SOLO GLI ASPETTI MATER 
IALI!"GOTO2410 

3440 REM ****************************** 
3450 REM ** DEFINIZIONI CICLO MENTALE** 
3460 REM ****************************** 

3470 D3*="I VOSTRI INTERESSI SONO COPIE 
FOTOSTA-" 

3480 X3$*"TICHE : SONO INCREDIBILMENTE COI 
NCIDENTI ! " ■' GOTO2570 

3490 B3$="AVETE TANTI INTERESSI COMUNI E 
D ACCET—” 

3500 X3*="TATE VOLENTIERI LE IDEE DEL PA 
RTNER.” : GOTO2570 

3510 D3*="AVETE INTERESSI COMUNI MA NON 
SEMPRE" 

3520 X3*="ACCETTATE I PROGETTI DEL PARTN 
ER" : GOTO2570 

3530 D3*="UN'IDEA CHE NON VI SODDISFA DI 
VÉNTA" 
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3540 X3#= ''ARGOMENTO DI UN'ACCESA DISCUSS 
IONE! : GQT02110 

3550 D3$=''ACCETTATE REMISSIVITÀ' E COMPR 
OMESSI " 

3560 X3$="PER NON DISCUTERE SU IDEE CONT 
RASTANTI" : OOTO2570 

3570 D3*="IDEE CONTRASTANTI,MOLTI LITIGI 
E CON-" 

3580 X3*="TINUI TENTATIVI DI RICONCILIAZ 
IONE!!" : GOTO2570 

3590 D3*="AVETE INTERESSI DIAMETRALMENTE 
OPPOSTI!" 

3600 X3$="CONTINUI LITIGI ANCHE PER COSE 
FUTILI!"GOTO2570 

3610 REM #*#*#*#*##**#***#**##***#***** 
3620 REM ** DEFINIZIONI MEDIA BIORITMO* 
3630 REM ****************************** 
3640 D4$="SIETE UNA COPPIA PERFETTA!!!” 
3650 X4*="TANTA GIOIA,TANTA FELICITA',TA 
NTO AMORE!":GOTO2730 

3660 D4$="LA VOSTRA UNIONE E' DURATURA!” 


3670 X4$="IL VOSTRO FUTURO E' TINTO DI R 
OSA !":GOTQ2730 

3680 D4*="FORMATE UNA BELLA COPPIA•GUALC 
HE SACRI-” 

3690 X4*="FICI0 E LA VOSTRA UNIONE SARA' 
PERFETTA."-GOTO2730 

3700 D4*="AVETE MOLTO IN COMUNE MA CI VU 

OLE IMPE-" 

3710 X4*="GNO PER PORTARE A TERMINE..L'I 
MPRESA! !" : GOTG2730 

3720 D4*=”C0PPIA POCO OMOGENEA.CI VUOLE 
MOLTO" 

3730 X4#="IMPEGNO PER RIUSCIRE A RESTARE 
INSIEME." : GOTO2730 

3740 D4*="LE DIVERSITÀ' DEI VOSTRI CARAT 
TERI " 

3750 X4*="POSSONO CAUSARE ROTTURE PROFON 
DE !" : GOTO2730 

3760 D4$="C0PPIE DEL GENERE,SE SI FORMAN 
0,DURANO" 

3/70 X4*="...86.400 SECONDI ! ! BUON DIVERT 
IMENTO!!” : GOTO2730 


3780 REM **************************** 

3790 REM ** STAMPA ANALISI MPS 803 ** 

3800 REM **************************** 

3810 0PEN4,4 : G$=CHR$( 14!:' : P*=CHR$< 15) : 0*= 
CHR$<16) 

3820 PRINT#4,G$;" ANALISI DELL'AFFINITÀ' 

3830 PRINT#4PRINT#4PRINT#4,"DI ";U0$;" 
E ";D0* 

3840 PRINT#4PRINT#4PRINT#4,P$,U0*;" E' 
NATO IL " 

3850 PRINT#4,FU;" ";GU$;" ";GU 

3860 PRINT#4," ERA DI ";GH$;"." : PRINT#4 : 

PRINT44 

3870 PRINT#4, " SEGNO ZODIACALE : .'USI*, ". " 
PRINT44 

3880 PRINT#4,D0*;" E' NATA IL" 

3890 PRINT#4,DD;” ”;GD$;" ";gd 

3900 PRINT#4," ERA DI GF*;":pRINT#4 

3910 PRINT44," SEGNO ZODIACALE :S2$; ". " 

: PRINT44 

3920 PRINT#4, "CI SONO ",DG;" GIORNI DI D 
IFFERENZA" : PRINT#4, "TRA ";U0$;" E UDO* 
3930 PRINT#4PRINT#4PRINT#4,G$;"ANALISI 
FINALE";P$:PRINT#4 

3940 PRINT#4PRINT#4PRINT#4,"AFFINITÀ' 
FISICA" 

3950 FORI = 1TQCA/3•PRINT#4,; •NEXTI 
3960 PRINT#4,0$,"38";CAI"X" 

3970 PR I NT#4 F'R I NT#4, D U : PR I NT#4, X U : PR I 
NT#4 : PRINT44 

3980 PRINT#4,"AFFINITÀ' EMOTIVA" 

3990 FORI=1TOCB/3 : PRINT#4,NEXTI 
4000 PRINT#4,0*;"38";CB;"X" 

4010 PRINTÌ4:PRINT#4,D2*:PRINT#4,X2$■PRI 
NT#4:PRINT#4 

4020 PRINT#4,"AFFINITÀ' MENTALE" 

4030 FORI=1T0CDX3 PRINT#4, : NEXTI 
4040 PRINT#4,0$; "38"; CD; “fi" 

4050 PRINT#4^ PRINT#4,D3*■PRINT44,X3S : PRI 
NT#4:PRINT#4 

4060 PRINT44,"MEDIA BIORITMO" 


4070 FOR1=1TOCE/3 : PRINT#4,; NEXTI 
4080 PR INT#4,0 $ ■ ‘ '38 ' ' ; CE; "X" 

4090 PRINT#4 PRINT#4,D4$ PRINT#4,X4* PRI 
NT#4 : PRINT44 

4100 PRINT44, "AFFINITÀ' ";SU;V";S2* 
4110 FORI=1TOCF/3^ PRINT#4NEXTI 
4120 PRINT44,0*;"38";CF;"X" 

4130 PRINT#4:PRINT#4,X5 t :PRINT#4:PRINT#4 

4140 PRINT#4,"MEDIA FINALE" 

4150 FOR 1 = 1 TOCG/3 : F'RINT#4, : NEXT I 

4160 PRINT#4,0*;"38";CG;"X" 

4170 PRINT#4 :PRINT#4,X6$ 

4180 PRINT44 

4190 CL0SE4 RETURN 

4200 REM ********************** 

4210 REM ** MOTIVO MUSICALE ** 

4220 REM ********************** 

4230 P0KE54296,38 
4240 P0KE54277,9 
4250 X=INT C RND(1)*150) 


4260 V=INT <RND(1)*150) 

4270 P0KE54273,X : P0KE54272,V 
4280 P0KE54276,17 
4290 FORI=1TO150 : NEXT 
4300 P0KE54276,0 
4310 RETURN 

4320 REM *************************** 

4330 REM ** RICERCA SEGNO ZODIACO ** 

4340 REM *************************** 

4350 ONMGOSUB4370,4390,4410,4430,4450,44 
70,4490,4510,4530,4550,4570,4590 
4360 RETURN 

4370 IFD<21THENSX*= ' CAPRICORNO":KX=1•RET 
URN 

4380 SX*='ACQUARIO”•KX=2 : RETURN 

4390 IFD<20THENSXf="ACQUARIO":KX=2: RETUR 

N 

4400 SX*=''PESCI":KX=3 : RETURN 

4410 IFD<21THENSX$='PESCI”:KX=3■RETURN 

4420 SX*="ARIETE" : KX=4: RETURN 

4430 IFD<21THENSX*="ARIETE":KX=4: RETURN 


4440 SX$=' 'TORO 1 ' : KX=5■RETURN 

4450 I FD<22THENSX*= ' 'TORO ' ' •' KX=5 •' RETURN 

4460 SX*= ''GEMELLI '’ ■ KX=6 •' RETURN 

4470 IFD<22THENSX*= ' 'GEMELLI"•KX=6 RETURN 

4480 SX*="CANCRO":KX=7: RETURN 

4490 IFD<23THENSX*='CANCRO'' : KX=7: RETURN 

4500 SX*= ''LEONE '' :KX=8 : RETURN 

4510 I FIi<23THENSX*= ''LEONE' ' : KX=8 •' RETURN 

4520 SXS= ' 'VEROINE ' ' :KX=9: RETURN 

4530 I FD<23THENSX$= ' VERO I NE ' ' • KX*9 : RETURN 

4540 SX*="BILANCIA":KX=10•RETURN 

4550 IFD<23THENSX$= ''BILANCIA" : KX=10 : RETU 

RN 

4560 SXt= ' ’SCORPIONE":KX=11 : RETURN 

4570 IFD<23THENSXJ="SCORRIONE" : KX=11 : RET 

URN 

4580 SX*='SAGITTARI0":KX=12 : RETURN 

4590 IFD<22THENSX$= ''SAGI TTAR 10 " KX= 12 : RE 

TURN 

4600 SX*=''CAPRICORNO" ; KX=1 RETURN 
4610 REM *************************** 

4620 REM ** RICERCA DEFINIZIONE ** 

** COPPIA ZODIACO ** 

4630 REM *************************** 

4640 ONKUGOSUB4660,4680,4700,4720,4740,4 
760,4780,4800,4820,4840,4860,4880 
4650 RETURN 

4660 ONKDGOSUB4970,4950,4940,4980,4930,4 
940,4980,4970,4960,4990,4990, 4960 

4670 RETURN 

4680 ONKDGOSUB4980,4950,4940,4970,4960,4 

970.4940.4930.4980.4960.4990.4990 
4690 RETURN 

4700 ONKDGOSUB4960,4960,4950,4990,4940,4 
980,4980,4990,4930,4940,4970,4970 
4710 RETURN 

4720 ONKBGOSUB4930,4960,4990,4970,4940,4 

960.4940.4980.4950.4980.4970.4990 


4730 RETURN 

4740 ONKDGOSUB4990,4960,4970,4980,4980,4 

930,4970,4990,4960,4950,4940,4940 


4750 RETURN 

4760 ONKDGOSUB4990,4980,4990,4940,4980,4 
970,4970,4960,4930,4950,4960,4950 
4770 RETURN 

4780 ONKDGOSUB4980,4930,4970,4940,4950,4 

960.4970.4990.4960.4950.4980.4990 
4790 RETURN 

4800 ONKDGOSUB4980,4960,4930,4950,4980.4 

930.4990.4960.4940.4970.4970.4940 
4810 RETURN 

4820 ONKDGOSUB4950,4940,4940,4950,4930,4 
970,4970,4960,4980,4990,4980,4960 
4830 RETURN 

4840 ONKDGOSUB4990,4940,4980,4930, 4960,4 
980,4930,4940,4970,4950,4960, 4950 
4850 RETURN 

4860 ONKDGOSUB4940,4950,4930,4990,4980,4 

970.4960.4950.4990.4980.4970.4940 
4870 RETURN 

4880 QNKDGQSUB4980,4970,4980,4960,4930,4 

940.4970.4930.4950.4940.4950.4990 
4890 RETURN 

4900 REM ****************************** 
4910 REM ««DEFINIZIONI COPPIA ZODIACO** 
4920 REM ****************************** 
4930 CF=100X5*= "LA VOSTRA LUNA DI MIELE 
DURA IN ETERNO" RETURN 
4940 CF=85"X5*="PROFONDA ARMONIA D'ANIMO 
E D'INTELLETTO" : RETURN 
4950 CF=65 : X5*="DISCRETO MENAGE MA RTTEN 
ZIONE ALL'INTESA ' ' : RETURN 
4960 CF=50X5$="AMICI NON AMANTI!!!!":RE 
TURN 

4970 CF=35 X5*="P0CA STABILITA' AFFETTIV 
A'" RETURN 

4980 CF=20:X5$= "TENSIONE,INCOMPATIBILITÀ 
',CONFLITTO!!" ; RETURN 

4990 CF=5X5*= "INFELICITÀ' E DISPREZZO R 
ECIPROCO!!"RETURN 

5000 REM **************************** 

5010 REM ««ROUTINE INSERIMENTO DATI#* 

5020 REM **************************** 


5030 INPUT"» ANNO <4 CIFRE) ";Y 

5040 IFLENCSTRSCV) >O5THENGOSUB5230 : GOTO 

5030 

5050 INPUT"» MESE (1-12) ";M 
5060 I FM< 1ORM>12THENGQSUB5230:GOTO5050 
5070 INPUT"» GIORNO (1-31) ",D 
5080 IFD<10RD>31THENGOSUB5230:GOTO5070 
5090 IFD=31ANDM=40RD=31ANDM=60RD=31ANDM= 
9 0RD=31ANDM=11THENGOSUB5230:GOTO5070 
5100 IFM=2 ANDD>29 THENGOSUB5230 GOTO507 
0 

5110 IFD=29 ANDM=2 ANDV/401NT < V/4)THENG 

OSIJB5230 : GOTO5070 

5120 PRINT"«ESATTO <S/N>?" 

5130 GETNM*:IFNM$=”"THEN5130 
5140 IFNM*= ' 'S"THENRETURN 
5150 IFNM$="N"THEN5170 
5160 GOTO5130 
5170 PRINT'"! 

5180 PRINT' ,r m 


5190 PRINT'"TT] 

5200 PRINT "rm 
5210 PRINT"TT1 
5220 GOTO5030 

5230 PRINT-TI T' : RE 

TURN 

5240 PRINT'SPREMI UN TASTO" 

5250 GETWY*: IFWY$= " 'THEN5250 

5260 RETURN 

READY. 
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CAMPIONATO DI CALCIO 

L 'andamento del campionato di calcio 
di serie A sul vostro C 16 



Il programma è predisposto 
per seguire qualunque cam¬ 
pionato di calcio poiché può 
visualizzare fino a 20 squa¬ 
dre, basta sostituire nella li¬ 
nea 10 i valori di Y e Y1, ri¬ 
cordando che Y deve essere 
di una unità inferiore al nume¬ 
ro delle squadre e Y1 di un’u¬ 
nità inferiore al numero delle 


ANALISI DEL LISTATO 


9-10 

Colore bordo e fondo schermo, valori relativi al nume¬ 
ro delle squadre 

15-20 

Dimensionamento variabili 

30-60 

Da utilizzare per il caricamento del primo file insieme 
alla linea 8900 

70- 

Inserimento giornata 

71- 

Trasformazione del numero della giornata in stringa 

73-125 

Caricamento dati da nastro 

180-210 

Inserimento nomi delle squadre nel tabellone 

220-240 

Attesa inizio partite o ritorno alla linea 180 

500-600 

Ordinamento classifica 

601-607 

Trasformazione numeri in stringhe 

610-615 

Visualizzazione squadre e punteggi 

630-660 

Assegnazione variabili 

2000-2100 

Visualizzazione tabellone 

6000-6100 

Routine di attesa eventi e visualizzazione tempo 

7500-7710 

Aggiornamento punteggi 

8000-8020 

Routine inserimento carattere numerico 

8900- 

REM (vedi la spiegazione nel testo) 

9000-9060 

Registrazione dati risultati finali 


9 COLOR4,2,1:COLOR0,2,1 

10 V=15 : V1=7 

15 DIMSQ$<Y) j PUX<Y) ; MI7i< Y).. RFX<Y) , RSX<Y> > S$<Y) ;GFX< Y)/ GSX(Y) .■ PX<Y) .■ WX< Y) 
20 DIMLX< 1 ^ Y1 > ^ PR$( 1 ^ V1 ? ; GQTO70 
30 FORI*0TOY: READSQ*<I> : NEXT 

40 DATA ATALANTA, RVELLI NO, BRRI, COMO, FIORENTI Hfì, IHTER, JUVENTUS, LECCE 
50 DATAMILAN,NRPOLI,PISR,ROMA,SAMPDORIA, TORINO,UDINESE,VERONA 
60 GOTO8900 

70 INPUT"331 ORNATA ".: TX 

71 T$=STR$(TX) 

73 PRINT"CARICAMENTO DATI" 

74 OPEN1,1,0,T$ 

75 FORI=0TOY 

80 INPUT# 1, SQ$ (.1), PIJ 7. < I , MI V. < I > , GFX d >, G3X <1 ) 

100 PX< I >=PUX<I ) ■ W?i( I >=MIXC I ) : RF?i< I ?=GFXCI) : RSX< I)=GSX< I > 

120 NEXT 
125 CL0SE1 

180 PRINT"□": FORI=0TOY1 

190 PRINT"SFARTITA"I + 1: INPUT"*" ; C$, F$ 

195 PRSC0, I> = " ":PR$a..I) = " 

200 PR*<0, I>=LEFT$<C$,7> :PRtU, I>=LEFT$<F$, 7) 

210 NEXT 

220 PRINT'TJSPACE PER COMINCIARE # PER RIPETERE" 

225 GETAf : IFA$<>" " ANDATO " * " THEN225 
227 IFA$="*"THEN180 
230 TI*="000000" 

240 GOTO2000 

500 REM CLASSIFICA 

505 PRINT"3T 1 RIGHT$<T$,2)""GIORNATA" 

507 PRINT 

510 PX=99 

520 FORI=0TOY 

530 FORH=0TOY 

540 IFI=0ANDH=0THEN660 

542 FORM=0TOI-1 

545 IFS$ < M>=SQ* <H >THEN600 

546 NEXT 

550 IFP1 y.yPIV. <. H > 0RPX<PUX < H > THEN600 
555 IFP1X<PUX < H)THEN660 


partite (per la serie B sarà: 
Y = 19, Y1 = 19). Inserite le 
partite da giocare e la giorna¬ 
ta corrispondente, sarà cari¬ 
cata dal registratore la situa¬ 
zione di classifica del turno 
precedente, e sarà visualizza¬ 
to il tabellone e la classifica 
aggiornata. Nella visualizza¬ 
zione i parametri mostrati, ol¬ 
tre al nome della squadra, 
sono: punteggio, media ingle¬ 
se, differenza reti, numero di 
reti segnate ed eventualmen¬ 
te l’ordine alfabetico. Sullo 
schermo viene visualizzato 
anche il tempo trascorso dal¬ 
l’inizio degli incontri ed è pos¬ 
sibile inserire le variazioni di 
punteggio in sequenza; alla 
fine delle partite, il program¬ 
ma consente la registrazione 
della nuova classifica, utile 
per il turno successivo. 

Una particolarità è rappresen¬ 
tata dalle linee 30, 40, 50, 60 
ed 8900 (vedi listato). 

Le istruzioni contemplate in 
tali linee sono da utilizzare 
esclusivamente al momento 
dell’inizializzazione del pro¬ 
gramma per creare il file ini¬ 
ziale contenente i nomi delle 
squadre ed i valori nulli della 
classifica. 

Per poterle utilizzare la prima 
volta è necessario eliminare 
l’istruzione GOTO 70 presen¬ 
te in linea 20, ed eliminare la 
REM di linea 8900 lasciando 
immutate le successive istru¬ 
zioni. Dopo aver dato il RUN 
il programma richiederà all’u¬ 
tente di svolgere le operazio¬ 
ni per la registrazione dei 
FILE 1. 

Eseguita la procedura biso¬ 
gnerà rimettere le cose così 
come erano in origine, riag¬ 
giungendo l’istruzione GOTO 
70 in linea 20 e la REM di li¬ 
nea 8900. Riavviando il pro¬ 
gramma, sullo schermo appa¬ 
rirà la richiesta di introduzio¬ 
ne delle partite. Le squadre 
andranno inserite per ogni in¬ 
contro, separate da una vir¬ 
gola. Per avviare l’orologio in 
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OUES TO PROGRAMMA È DISPONIBILE SU CASSETTA 0 DISCO PRESSO 
LA REDAZIONE. PER LE ISTRUZIONI DI ACQUISTO CONSUL TA TE LA 
PAGINA DI APERTURA DELLA SEZIONE PROGRAMMI. 


UTILITÀ 
DI ANTONELLO CASAGNI 
MASSIMO TRUSCELLI 


concomitanza con l’inizio del¬ 
le partite basterà premere la 
barra spaziatrice; se è stato 
commesso qualche errore 
nell’introduzione delle partite, 
si può rimediare premendo il 
tasto (*) e riscrivendo tutte le 
squadre. I tasti (/) e ( = ) visua¬ 
lizzano rispettivamente la 
classifica precedente o ag¬ 
giornata con i punteggi, e le 
partite. Premendo il tasto con 
la “chioccioletta” è possibile 
sincronizzare l’orologio al 
45mo minuto della ripresa del 
gioco. 

Per l’aggiornamento dei dati 
è necessario premere il tasto 
(&). 

A questo punto è possibile 
seguire per l’aggiornamento 
due diversi metodi 

1) premendo il tasto (&) com¬ 
pare, in alto sullo schermo, il 
nome della prima squadra de¬ 
gli incontri, premendo subito 
dopo il tasto (-) si aumenta di 
una rete il punteggio della 
squadra visualizzata mentre il 
nome rimane scritto per alcu¬ 
ni secondi durante i quali la 
situazione viene aggiornata; 

2) premendo il tasto (&) e su¬ 
bito dopo il tasto (*), il com¬ 
puter attende l’introduzione 
di un ulteriore carattere (un 
numero da 0 a 9) e pone le 
reti della squadra visualizzata 
pari al valore del tasto premu¬ 
to, mostrando la squadra suc¬ 
cessiva. In questo caso la 
classifica non viene aggiorna¬ 
ta subito ed il programma 
presenta le stesse condizioni 
operative valide per la proce¬ 
dura precedente. 

Il secondo metodo di aggior¬ 
namento dei risultati si mo¬ 
stra particolarmente utile per 
correggere eventuali errori 
oppure per permettere un ra¬ 
pido inserimento dei risultati 
finali. Premendo altri tasti 
vengono visualizzate le squa¬ 
dre successive fino alla sedi¬ 
cesima. Se tale procedura 
viene eseguita dopo la pres¬ 
sione del tasto (&), si ha un 
aggiornamento della classifi¬ 
ca pur restando nulli tutti i ri¬ 
sultati. Alla fine delle partite, 
dopo che la classifica sarà 
stata aggiornata, premendo il 
tasto ( + ) si opererà la regi¬ 
strazione su nastro dei dati in 
vista del turno successivo. 



565 THEN660 560 IFmX>MIX(H)THEN600 

570 IFD1 y.yRFX ( H )-RSX ( H ) THEN600 

575 I FD 1 Y.<RFY. < H ) -RSY. < H ) THEN660 

580 IFR1 Y.ÌRFy. < H ) THEN600 

585 I FR 1 YXRFY. < H ) THEN660 

600 NEXTH 

601 P*=MID*<STR*<P1X-1),2,2) 

602 FY.=R\Y.-I)ÌY. 

603 RF*=MID*<STR*(R1X),2,2) 

604 RS*=MID*<STR*<FX),2,2) 

605 IFLEN<P*)=1THENP*=" "+P* 

606 IFLEN(RF$)=1THENRF*=" "+RF* 

607 IFLEN<RS*)=1THENRS*=" "+RS* 

610 PRINTS*( I ) ; TflBC 10) "WP*; TflB<12) "W'MIX; TRB<16) "3"RF*, TRB< 19)RS*"«" 

612 PY.=P1Y.PIY.=Q 
615 NEXTI 
630 FORI=0TOY 

640 S*<I)=" " j 

650 NEXT:GOTO6000 

660 s*< i ) =sq*<h) : pi y.=p\jy. <h> mx=fiiK<H) : di y.=ppy. <h)-rs y. <h) ; ri y.=rfy. goto 60 @ 

2000 REM INCONTRI 

2010 PRINT"rS"RIGHT*(T* .>2)""GIORNRTR" 

2020-PRI NT " li! r-T-r-r -1 " 

2030 FORI=0TOY1 

2035 L*=f1ID*<STR*<L7i<0,1)>,2,1> : J*=MID*<STR*<L7i< 1, I)),2,1) 

2040 PRINT" I3"PR*<0.- I )TAB<8) "III I3"PR*< 1 > I )TfìB< 16) "ITI li"L$"!3 II" J*"fil I " 

2050 PRINT" I-1-f—h-T 

2060 NEXT 

2070 PRINT ,,r T- 1 -'—'—' " 

2100 GQTO6000 
6000 GETA* 

6010 IFfi*=" / "THEN500 

6020 IFR*="="THEN2000 

6030 IFfì*»"£"THEN7500 

6040 IFA*="@"THENTI*="004500" 

6045 I FA*="+"THEN9000 

6050 PRI NT " «I",INT <TI /3600 ) .; " Il ; " RIGHT* < TI *. 2 ) 

6100 GOTO6000 

7500 REM AGGIORNAMENTO 

7502 FORS=0TOV1 

7505 FORU=0TO1 :PRINT"S", PR*<U,S>" 

7510 GETR* : IFR*=""THEN7510 

7520 IFR*="-"THENLX<U,S)=LX<U,S)+1 U=1 : S=Y1 

7525 IFR*="*"THENGOSUB8000 

7530 NEXT:NEXT 

7540 FORI=0TOY 

7550 FORH=0TO1 

7560 FORM=0TOV1 

7570 SK=SGN f 3-<H+1)*2):KX=0 

7580 IFLEFT*<SO*<I),7)OPR*(H,M)THEN7700 

7590 RF£< I ) =G FY. (. I ) +LY. < H, M ) : RSY. (I ) =GSX < I ) +LY. < H+SX, M ) 

7600 PU?Ì < I ) =P Y. (. I ) +1+SGN < LY. < H, M ) -L Y. (. H+SX, M ) ) 

7610 I FSY.= 1THENKX--1 

7620 MI Y .( I ) = IAY .< I ) +KX+SGN< LY. <H, M)■ -LY. <H+S Y. j M) ) 

7700 NEXTM:NEXTH:NEXTI 
7710 GOTO2000 

8000 GETR* IFA*=""THEN8000 
8010 PSX=VAL<fi*) : IFPS?i<0ORPSX>9THEN8000 
8015 L7iai,S)=PStf 
8020 RETURN 

8900 REM FORI =0TOV : PIJ Y. < I ) = 1 NEXT 
9000 REM REGISTRAZ. DRTI 

9002 PRINT'TFEG. RISULTATI FINALI " TY.=TY.+ 1 
9005 T*=STR*(TX) 

9010 0PEN1,1,1,T* 

9015 R*=CHR*<13) 

9020 F0RI=0TOV 

9030 PRINT#1 > SQ*( I ) ; fi*; PU Y.<. I ) A*; MIX< I ) ; fi*; RF Y.<. I ) ; fi*. RS Y.< I ) 

9034 NEXT 
9045 CL0SE1 

9050 TY.-TY.-l • T*=STR*<T/i) 

9060 PRINT"3" G0TO6000 
READY. 
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AGENDA TELEFONICA 


UTILITÀ 
DI MASSIMO mSCELLI 


Il maggior svantaggio nel 
creata DATA BASE per i com¬ 
puter domestici, consiste nel 
dover far uso del lento regi¬ 
stratore a cassette come uni¬ 
tà di memoria di massa. 

La maggior parte dei lettori si 
serve proprio del registratore 


140 PRINT "8 AGENDA TELEFONICA " 

150 PRINT"Si 

160 PRINT"WWMHWMEriORIA LIBERA"FRE<0> 

165 PRINT II « W «W BM 11 

170 PRINTTABC5)"PREMI UN TASTO"•GOSUB750 
300 PR INT "TTAB<4 ) "MENU ■' " 

310 PRINT-MM0 ■ FINEW" 

320 PRINT "4- = MEMORI2ZAZI0NEW" 

330 PRINT "t = RICERCAWWW" 

340 PRINTTAB<4) "WIODPZIONE ?" 

350 GOSUB750 

360 IFQ-64THENPRINT"3": END 
370 IFQ»94THEN410 
380 IFQ=95THEN550 
390 GOTO350 

410 W$="" : PRINT ".TSPC< 2 > " SRI CERCA IN MEMORIA" 

420 PRINT :F0RK=1T022:PRINT"; :F0RT=1TO20•NEXTT,K:PRINT 
430 PRINTTAB(4) "(1 = PER FINIREW" 

440 RESTORE:READNN 

450 PRINT"»*WaUALE E' IL NOME" 

460 INPUT"»***!", N$ 

480 IFASC < N$ >-64THENRUN 
490 PRINT"H" 

500 READN:READWf■IFN=NNTHENFF=1 

510 IFN$=LEFT$(W*,LEN<N$> > THENGOSUB780 

520 IFFF=1THENGOSUB820:FF=0:GOTO410 

530 GOTO500 

550 RR$~"" ; V$=" 

II 

560 V* <1)- 1 " SNOME ; " : V*<2 > = " 3RECAP.:": V* < 3 >=" SU' TEL. : " 

570 FORKJ=1T03■PRINT"3":U=FRE(@ ) 

580 IFUC=300THENPR INT" WWMEM. OCCUPATA * " 12277-U •’ PRINT "*J3=PER FINI REM" : GOTO600 
590 PRINT"KOT1EM0RIA ="IJ : PRINT"MB«PER FINIREW" 

600 FORIO0TQ21 : PRINT"_"; : F0RT=1TO10 : NEXTT,K 
610 PR I NT " MB" V$ < KJ ) 

620 PRINT"WStWHWMW" 

630 GETA$ : IFAt=""THEN630 
640 IFAf®"@"THENRUN 

650 I FAf=CHR$< 13> THENRR$=RR$+LEFT $ < R$+V$.. 21 > • R*=" " : NEXTKJ : GOTO690 

660 R$»R*+A*: IFLEN< R$ ><21THEN680 

670 R#*CHR$(13) : GOTO650 

680 PRINT"M»*******rR*"_" : GOTO630 

690 RESTORE■READN:N=N+10 

700 PRINT"23"N"DATA"N" , "RR$ 

710 PRINT"1000 DATA"N 
720 PRINT"GOTO550" 

730 POKE1319,19 : F0RK=1320TO1322 :POKEK,13:hEXTK:P0KE239,5 
740 END 

750 GETQ$ : IFQ$=""THEN750 
760 Q*ASC < Q$ ) '■ RETURN 
780 PRINT "TMIBfCW*, 1,21) 

790 PRINTMID$<W$,22,21 ') 

800 PRINTMID$(W*,43) 

810 FORK= 1T022 : PR INT " -" : FORT® 1 TOSO : NEXTT, K 
815 PRINT 

820 IFFF=1THENPRINT"7FINE DATI 
830 PRINT"PREMI UN TASTO" 

840 GOSUB750 
850 RETURN 
1000 DATA 1010 

1010 DATA L01Ó , LIST _ _ V. F. STILI CONFI 11 0F/7F65495 . 


a nastro e ben conosce la 
«macchinosità» e lunghezza 
dei tempi per creare i propri 
FILES. Sfruttando adeguata- 
mente una caratteristica dei 
sistemi COMMODORE è però 
possibile creare un DATA 
BASE che carichi insieme al 



100 PRINT"»" 

PDTMT"S 


programma principale anche 
tutti i dati da richiamare. Tut¬ 
ta la procedura è basata sul 
fatto che è possibile interveni¬ 
re direttamente sul BUFFER 
di tastiera. Se a ciò si aggiun¬ 
ge che simulando la pressio¬ 
ne del tasto RETURN e posi¬ 
zionando il cursore sulle linee 
presenti sullo schermo, esse 
passano automaticamente in 
memoria aggiungendosi quin¬ 
di al programma, si capisce 
bene come da programma si 
possa realizzare una routine 
che aggiunga automatica- 
mente nuove linee allo stes¬ 
so. Se queste linee corrispon¬ 
dono ad istruzioni DATA con¬ 
tenenti gli stessi dati che soli¬ 
tamente vengono «dirottati» 
nei FILES su registratore, la 
velocità e la praticità delle 
procedure è nettamente su¬ 
periore rispetto ai metodi tra¬ 
dizionali. 

Il «fulcro» della procedura è 
compreso tra le linee 700 e 
730. Esse, nell’ordine, visua¬ 
lizzano sullo schermo le nuo¬ 
ve istruzioni DATA contenenti 
rispettivamente i nuovi nomi¬ 
nativi immessi ed il codice 
corrispondente all’ultimo nu¬ 
mero di linea presente al mo¬ 
mento nel programma. L’ulti¬ 
ma istruzione del listato con¬ 
sente di riprendere automati¬ 
camente l’esecuzione non 
senza che però, per mezzo 
della linea 730, sia stata si¬ 
mulata la pressione per tre 
volte, corrispondente al nu¬ 
mero di linee visualizzate, del 
tasto RETURN. Il programma 
è diviso sommariamente in 
tre blocchi: 

100-390 Inizializzazione del 
programma, stampa della co¬ 
pertina e del menù, riconosci¬ 
mento dell’opzione prescelta. 
410-530 Routine che si occu¬ 
pa di ricercare tra i dati conte¬ 
nuti in memoria come istru¬ 
zioni DATA, il nominativo ri¬ 
chiesto. 

550-740 Questa terza routine 
è la più importante del pro¬ 
gramma e grazie ad essa è 
possibile memorizzare i nomi¬ 
nativi inseriti da tastiera nelle 
nuove linee contenenti le 
istruzioni DATA. 
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WIMBLEDON 

Un ping-pong elettronico per provare i 
vostri riflessi 


QUESTO PROGRAMMA E DISPONIBILE SU CASSETTA 0 DISCO PRESSO 
LA REDAZIONE. PER LE ISTRUZIONI DI ACQUISTO CONSULTATELA 
PAGINA DI APERTURA DELLA SEZIONE PROGRAMMI. 



Da quando è scoppiato il 
boom dei video-games, ne 
sono stati inventati a migliaia, 
sempre più sofisticati ed av¬ 
venturosi dettati solamente 
dai limiti della fantasia dei 
loro creatori riuscendo a 
sfruttare al massimo le capa¬ 
cità delle ottime macchine 
presenti sul mercato. 

Quando nacquero i videoga- 
mes, i computer che li sup¬ 
portavano non erano stati 
concepiti per tali scopi come 
spesso sono quelli odierni 
(vedi l’introduzione degli spri- 
tes, dei chip musicali e dei 
comandi per la loro gestione) 
e così, per ottenere dei buoni 
risultati nel creare un video¬ 
gioco, bisognava per forza di 
cose usare routine in linguag¬ 
gio macchina per mitigare i li¬ 
miti e la non specificità delle 
macchine. 

Sicuramente a spingere la 
diffusone e la conoscenza de¬ 
gli home-computer è stata la 
possibilità di avere nella pro¬ 
pria casa una vera e propria 
Arcade (sala-giochi) anche se 
i più giovani, non sanno tal¬ 
volta neanche sfliare il più 
semplice dei programmi. 

I programmi che Vi offre la 
nostra rivista sono sempre di¬ 
retti ad uno scopo didattico, 
giochi o utility che siano, e la 
loro difficoltà è variante a se¬ 
conda del tipo di alagoritmi in 
essi contenuti e non solo di¬ 
pendente dalla lunghezza dei 
listati o dal tempo di digitazio¬ 
ne necessario. 

Wimbledon è un video-tennis 
di tipo tradizionale, con i gio¬ 
catori rappresentati da due 
racchette rettangolari che 


STRUTTURA DEL PROGRAMMA 

100-290 

Inìzializzazione, 

300-360 

Posizionamento sprites racchette in battuta. 

370-500 

Visualizzazione del campo di gioco. 

510-640 

Caricamento sprites racchette e pallina. 

650-730 

Controllo spostamento racchetta giocatore. 

740-850 

Flusso principale del programma. 

860-970 

Collisione sprites (racchette-pallina). 

980-1100 

Aggiornamento punteggio e controllo di fine gioco. 

1100-1350 

Fine gioco e richiesta di nuova partita. 


cercano di respingere uno 
contro l’altro una pallina la 
quale può anche rimbalzare 
sui bordi del campo ma non 
deve però oltrepassare le li¬ 
nee di fondo del terreno di 
gioco. 

In questa versione, voi potete 
solo controllare la racchetta 
che si trova sulla destra dello 
schermo mentre il vostro av¬ 
versario non sarà altri che il 
computer. 

io " ". 

20 'msx msx' 

30 ' 

40 'Wimbledon ' 

50 ' WWWUWWWNWWWNWWWWW ' 

60 ' 

70 ' di F, Russo 
80 'msx msx ' 

90 . 

100 ' 

110 ' inizalizzazione 
120 ' 

130 CLEAR 

140 PLAY”vl5m255116" 

150 DEFINT D-T 
160 0N SPRITE G0SUB890 
170 0N STRIG GOSUB 1310 
180 3=0 

190 G0SUB 540 ' car. sprites 
200 GOSUB 400 ' schermo gioco 
210 B=2 

220 Al=.2iG=G-l 
230 Y=85:PY=78:T=85:F=1 
240 A = INT(RND(—TIME)*2) 

250 IFA=0THENA=5:PX=100:ELSEA*-5: A1=-A1:PX=200 

260 GOSUB 330 'pos. ini. sprites 

270 GOSUB 680 'comandi 

280 GOSUB 770 '■flusso 

290 GOTO 270 

300 ' 

310 ' pos. iniziale sprites 
320 ’ 

330 PUTSPRITE0,(226,85) ,4,0 
340 PUTSPRITE 1,(30,85),8,0 
350 F0R K = 0 T0 1000:NEXT 
360 RETURN 
370 ' 

380 ' schermo gioco 
390 ' 

400 OPEN"grp:"AS1 
410 PSET(0,4),0 

420 PRINT41," imi Wimbledon 11111 » ; 
430 COLOR 7 

440 LINE(24,20) — <238,180),10,BF 
450 LINE(23,19)-(239,1B1),4,B 
460 LINE(131,19)—(131,181),4 
470 LINE(20,182)—(255,191),1,BF 
480 PSET(20,182) ,1 


490 PRINT#1,"VComputer 00 ff Player 00V" 
500 RETURN210 
510 ' 

520 ' caricamento sprites 
530 ' 

540 COLOR 10,1,1 
550 SCREEN 2,1,0 
560 F0R T*0 T0 7 
570 A$=A$+CHR$(224) 

580 READ A 

590 B*=B*+CHR$(A) 

600 NEXT 

610 SPRITE*(0)= A* 

620 SPRITE*(1)=B$ 

630 RETURN 

640 DATA 0,0,0,48,48,0,0,0 
650 ' 

660 ' controllo comandi 
670 ' 

680 0N STICK(J)60T0700,720,720, 

720,710,720,720 

690 G0T0720 

700 IF YO15THENRETURNELSEY = Y-5:G0T0720 

710 IF Y>=170THENRETURNELSEY*Y+5 

720 PUTSPRITE0,(226,Y),4 

730 RETURN 

740 ' 

750 ' flusso 
760 ' 

770 IF PY>=1720RPY<*10THENB=-BiPLAY"03c“: 
F“RND(—TIME)*3:IFPY<100THENPY= 
12ELSEPY=171ELSE780 
780 PX=PX+A:PY=PY+B 

790 IF PY>=1720RPY<=10THENB=-B:PLAY"03c": 

IFPY<100THENPY=11ELSEPY=171 

800 IF PX>110ANDPX<150THENSPHITE0N:G0T0810 

B10 PUTSPRITE2,(PX,PY),15,1 

820 T = T+F+(B-1 ) 

830 PUTSPRITE 1,(30,T) ,8,0 
840 IF PX>=2520RPX a =< 10THEN1010 
B50 RETURN 
860 ‘ 

870 ' collisione sprites 
880 ' 

890 SPRITE OFF 
900 IFA>=9THENA=9 
910 A»-A:A1 —Al 

920 Q=INT(RND(-TIME)*2):IFQ=0THEND=-1ELSED=1 
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930 B“(B+l)+B»D/4sA*A+AÌ 

940 IF PX>=122THENPX=215:PLAY"04C":GOT0960 
950 PX=30:PLAY“05C" 

960 PUTSPRITE2,(PX,PY),15,1 
970 RETURN 
980 ' 

990 ’ punteggio 
1000 ' 

1010 PUTSPRITE2,(0,209) 

1020 IF PX< 122THENS1*S1 + 1:SC = S1:A=15:GQTD 
1030ELSEA = 0:S2=S2+ls SC = S2iGOTO 1030 
1030 SC$=MID$(STRI(SC),2) 

1040 SC$«STRING$(2-LEN(SC*j,"0")+SC$ 

1050 LINE(100+A*8,182)-(116+A*8,190),1,BF 
1060 PSET(100 + A * 8,182),1 :PRINTttl ,5C$; 

1070 PLAY"02L2CL16" 

1080 IFSC=21THENRETURN1140 
1090 FORT=OT02000iNEXT 
1100 RETURN210 
1110 ' 

1120 ' Fine gioco 
1130 ' 


1140 COLOR 10 

1150 PSET(67,100),2 

1160 PRINTttl,"G A N E OVER" 

1170 IF S2=SC THEN A*="Co«puter Nin*! ! !": GOTO 
1180 A4*"You heve Non !!!" 

1190 COLOR 1 

1200 PSET( 140,155), 2 

1210 PRINTttl,"Press SPACE" 

1220 PSET( 140,165) ,2 
1230 PRINT#l,"to continue" 

1240 STRIG (0)ON 

1250 FOR T»3 TO 15 

1260 COLOR T 

1270 PSET(67,130) ,2 

1280 PRINTttl,A4 

1290 NEXT 

1300 GOTO 1250 

1310 STRIG (0)OFF 

1320 PUTSPRITEO,(0,208) 

1330 COLOR 15 
1340 SC*0iS1=0:S2 = 0 
1350 GOTO 440 


Il joystick è superfluo dato 
che la racchetta può spostar¬ 
si solamente in verticale co¬ 
sicché dovrete usare i tasti 
cursore freccia in sù ed in 
giù. 

Se voi non siete d’accordo, 
potrete modificare la variabile 
H90 J nella linea del programma 
180 per abilitare il joystick. 

Il match finisce quando voi od 
il computer raggiungete il 
punteggio di 21 palline man¬ 
cate dall’avversario. 
L’angolazione della pallina e 
la velocità della stessa varia¬ 
no continuamente rendendo il 
gioco più vario e meno preve¬ 
dibile e vi assicuro che il com¬ 
puter vi darà veramente del 
filo da torcere. 

A questo punto non resta che 
augurarvi buon divertimento 
sperando che oltre a giocare 
vorrete cercare di analizzare 
il listato del programma. 



SG3000 


QUESTO PROGRAMMA È DISPONIBILE SU CASSETTA O DISCO PRESSO 
LA REDAZIONE. PER LE ISTRUZIONI DI ACQUISTO CONSUL TA TE LA 
PAGINA DI APERTURA DELLA SEZIONE PROGRAMMI. 



DRAWER 


PER GLI ESTIMATORI DEL SEGA SC 3000 QUESTO MESE ABBIAMO UNA VERA E PROPRIA “CUCCAGNA” CHE BEN SFRUTTA LE 
DOTI DEL COMPUTER: UN VELOCISSIMO E VERSATILE DISEGNATORE ELETTRONICO. UN PROGRAMMA GRAFICO SCRITTO IN 
LINGUAGGIO MACCHINA DALLE CARATTERISTICHE SUPERLATIVE. IL PROGRAMMA SI COMPONE DI DUE DIVERSE PARTI ED È 
STATO INVIATO DAL LETTORE ENRICO BRUNERO DI ALICE CASTELLO (VC) AL QUALE FACCIAMO I NOSTRI COMPLIMENTI. 

PER IL COMMENTO DEL PROGRAMMA LASCIAMO UBERO SPAZIO ALLE ESAURIENTI NOTE INVIATECI DALLO STESSO AUTORE. 



Il joystick va inserito in porta 
1; una freccia indica la posi¬ 
zione del cursore. Per dise¬ 
gnare basta tenere premuto il 
pulsante muovendo il joystick 
in una delle otto direzioni 
possibili. 


ELENCO TASTI UTILIZZATI 
E DESCRIZIONE DELLE 
LORO FUNZIONI 

Si ricorda che le linee riporta¬ 
te sulla destra indicano ri¬ 
spettivamente: “S” velocità 
di scrittura e “N” velocità di 
spostamento; in basso a de¬ 
stra “S” corrisponde al colo¬ 
re di scrittura e “F” a quello 
di sfondo. 

P: Colora delle aree. 

C: Seleziona le coordinate 
di partenza per disegna¬ 
re LINEE, RETTANGOLI, 
RETTANGOLI COLORA¬ 
TI. 


L: Disegna una linea. 

B: Disegna un rettangolo. 

F: Disegna un rettangolo 
colorato. 

O: Cancella il disegno. 

D: Attiva l’effetto specchio. 

W: Input caratteri da stam¬ 
pare. 

O: Stampa caratteri. 

J: Salva o legge un disegno 
da disco. 

I: Cursore lampeggiante. 

U: Cursore non lampeg¬ 
giante. 

Q: Selezione colore cursore 
(funziona solo quando il 
cursore non lampeggia). 

M: Selezione colore scrittu¬ 
ra. 


M: Selezione colore sfondo. 

V: Selezione colore scrittu¬ 
ra (per la selezione di un 
colore posizionare la 
freccia sotto il colore de¬ 
siderato quindi premere 
il tasto corrispondente 
alla funzione desiderata 
Q.M.V.) 

A: Annulla coordinate, an¬ 
nulla effetto specchio, 
annulla la duplicazione di 
una parte del disegno. 

K; Disegna un cerchio (pre¬ 
mere la leva del joystick 
verso destra per ingran¬ 
dire il cerchio, verso sini¬ 
stra rimpicciolirlo. Per ot¬ 
tenere una forma ellittica 


52 


LIST 4 









premere verso l’alto, ver¬ 
so il basso per ottenere 
una forma ovale. Preme¬ 
re il pulsante per confer¬ 
mare il cerchio). 

T: Modo scrittura (annulla 
l’effetto dei tasti G e R). 

G: Gomma. 

R: Colora il disegno, modifi¬ 
candone il colore di sfon¬ 
do e di scrittura (selezio¬ 
nare il colore di sfondo e 
di scrittura desiderato di¬ 
rigendo il cursore sulla 
parte del disegno sele¬ 
zionato e premendo il 
pulsante). 

S: Modifica la velocità di 
scrittura. 

N: Modifica la velocità di 
spostamento. 

Uniti ai tasti S, N 

1: Aumenta la velocità 

rapidamente. 

2: Aumenta la velocità 
lentamente. 

3: Diminuisce la velocità 
rapidamente. 

4: Diminuisce la velocità 
lentamente. 

Z: Conferma la velocità se¬ 
lezionata. 




9: Ingrandisce una parte di 
disegno. 

Dopo aver premuto il ta¬ 
sto 9 dirigere il rettango¬ 
lo che apparirà sulla par¬ 
te che si vuole ingrandire 
e premere il tasto 1 e il 
pulsante del joystick. 

Per cancellare premere il 
tasto 2 e il pulsante del 
joystick. 

Per cancellare la parte 
ingrandita premere O. 
Premere il tasto 6 per 
non tener conto delle 
modifiche apportate. 

In caso contrario preme¬ 
re il tasto 9. 

H: Duplica una porzione di 
disegno. 

Selezionare la grandezza 
della parte del disegno 
da duplicare utilizzante 
la leva del joystiesk + 
tire 

Leva a destra + fi re = in¬ 
grandisce il rettangolo 
Leva giù+ fire = ingran¬ 
disce il rettangolo 
Leva su+fire = rimpic¬ 
ciolisce il rettangolo 
Leva a sinistra + tire rim¬ 


picciolisce il rettangolo 
Dirigere il rettangolo sul¬ 
la parte da duplicare. 
Premere la sbarra spa¬ 
ziatrice. 

Dirigere il rettangolo su 
una nuova parte del fo¬ 
glio e premere fire. 

1: Salva temporaneamente 
il disegno in memoria, (i 
colori non vengono sal¬ 
vati per questioni di me¬ 
moria). 

t: Richiama il disegno sal¬ 
vato precedentemente in 
memoria. 

Queste due ultime fun¬ 
zioni non funzionano con 
la versione BASIC 3A. 


ISTRUZIONI 
PER IL CARICAMENTO 
DEL PROGRAMMA 

1) Caricare il programma CO¬ 
DICI e dare il RUN. 

Attendere alcuni secondi ne¬ 
cessari al caricamento del 
programma in linguaggio 
macchina. 

2) Caricare il programma DI¬ 


SEGNO e dare il RUN. 

Il programma CODICI con¬ 
templa una routine in linguag¬ 
gio macchina che permette il 
rapido caricamento dei dati in 
memoria. 

Il caricamento avviene in que¬ 
sto modo. 

100 DATA aaaa, NNNN, nn, 

nn, nn, nn,.nn, nn,;; 

aaaa Segnala che devo¬ 

no essere caricati in 
memoria dei codici. 
NNNN Indica l’indirizzo di 

partenza per il cari¬ 
camento (in esade- 
cimale). 

nn Sono i dati da cari¬ 

care in memoria. 

;; Indica la fine del ca¬ 

ricamento. 

N.B.: Seguire correttamente 
la sintassi poiché un 
carattere in eccesso 
può compromettere il 
corretto caricamento 
dei codici. 


La rutine viene attivata con 
una CALL &HFF74 



DI ENRICO BRUNERO 


STRUTTURA DEL PROGRAMMA 


20-100 

110-500 

1000-1050 

1500-1550 

2000-2010 

2500-2520 

2600-2620 

2800-2820 

2900-2920 

3000-3050 

3100-3120 

3200-3220 


Inizializzazioni delle variabili, creazione degli sprite e 
loro relativa visualizzazione. 

Loop principale del programma. 

Modifica velocità di scrittura. 

Modifica velocità di spostamento. 

Colorazione di aree. 

Memorizza le cordinate iniziali per disegnare linee, 
rettangoli. 

Creazione di una linea. 

Creazione di un rettangolo. 

Creazione di un rettangolo colorato. 

Cancellazione del disegno 
Selezione colore scrittura. 

Selezione colore di sfondo. 


3300-3610 Creazione, di cerchi, ellissi, ovali. 

4000-4060 Memorizzazione dei dati necessari al funzionamento 


della gomma. 

4500-4600 Ripristina i dati necessari alla scrittura. 

4700-4760 Colorazione disegno. 

5000-5520 Salva o legge un disegno da disco. 

6000-6940 Gestisce l’ingrandimento del disegno. 

7000-7460 Duplica una parte di disegno. 

7500-7510 Permette di riconoscere il colore selezionato. 
8000-8050 Modifica la velocità di spostamento o di scrittura. 
9000-9011 Disegna le due linee della velocità 
10000-10530 Input stringa, stampa stringa. 

11000-11020 Cambia il colore al cursore. 


12000-12023 Legge il disegno dalla memoria. 
13000-13020 Salva il disegno in memoria 


DR8LIER 


programma caricatore COPICI 


1 BOTO 1000 

2 D8T8 @606,E310,F5> E5,21,03,3B> 22,86, 
E6,00,CD,87,E2,00,38,88,E6,FE,01,C8,28 
,E3,3E,01,C3,2C,E3,3E,0F,32,85,E6,-21,0 
3,3B,22,83,E6,00,CO,71,E1,00,E1,F1,C9, 
00,00, 00 ,CD, 00 ,E1,CD,80,E0,C9, ; ; 

10 D8T8 8@@@,DFFD,CD,10,E3,E5,F5,C5,F3 
,CD,65,£1,38,82,£6,FE,FF,C2,14,E0,FB,C 


1, FI, E1, C9, CD, 40, E3, CD, 95, E1,38, 81, E6, 
32,85, E6,01,00,3B, ED,43,83,E6,CD,71,E1 
,38,80,E6,32,85,£6,01,01,3B,ED,43,83,E 
6,CD,71,E1,38,82,E6,CB,67,C8,48,E0,CD, 
C4,E1,C3,04,£0,CD,30,E2, ; ; 

20 D8T8 @@@@,E04B,CD,Di;E2,CD,82,E2,CD 
,B7,E2,38,C2,E6,FE,00,C2,5F,E0,C3,04,E 
0, 28,80, E6, E5,38,80, E6, 47, 3E, E6, 90,32, 
80,E6,CD,30,E2,CD,DI,E2,E1,CD,B7,E2,22 
,80,E6,C3,04,E0,; ; 

25 D8T8 88@8,EO80,38,C0,E6,47,FE,00,C8 
,8F,E0,05,78,32,C0,E6,C9,3E,01,32,C0,E 
6, CD,10,E3,C9, ; ; 

30 D8TB 8888,E100, F5,C5,D5,ED,4B,80,E6 


, 38,82,E6,CB,E7,57,FE,FE,C2,16,E1,05,C 
3, 5D, E1,78, FE, F6, C2,21, E1,05,0C, C3, 5D, 
E1,78,FE,F7,C2,28,El,0C,C3,5D,E1,78,FE 
,F5,C2,36,E1,04,0C,C3,50,E1,78, FE, FD, C 
2, 40,El,04,C3,5D,El,78,FE,F9,C2,48,E1, 
04,00,;i 

40 D8T8 @@e@,E148,C3,5D,El,78,FE,FB,C2 
> 55,E1,0D,C3,5D,E1,78,FE,F8,C2,5D,£ 1,0 
5,0D,ED,43,80,E6,DI,CI,FI,C9,; ; 

50 D8T8 @868,E165,F5,3E,07,D3,DE,DB,OC 
,32,82,E6,FI,C9, ; ; 

60 D8T8 888@,E171,F5,C5,ED,4B,83,E6,0B 
,79,D3,BF,78,D3,BF,38,85,E6,00,00,00,0 
0,D3,BE,CI,FI,C9, ; ; 
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70 D6T6 eeee, £186,00,00,00,00, 00,00,00 
,00,00,00,00,F5,C5,ED,4B,60,£6,79,FÉ,0 
6, C2,65, E1,0C,C3,6C,E1,79,FE,DC,C2,6C, 
E1,0D,78,FE,0C, C2,86,E1,04,C3,BD,E1,78 
, FE,BE,C2,BD,E1,05,ED,43,60,E6,C],FI,C 
9, J J 

80 06T6 6866,E1C4,F5,C5,36,69,£6,47,36 
,66,E6,4F,0D,C2,CE,E1,05,C2,C6,E1,C1,F 

1, C9, j ì 

90 D6T6 88@@,E1D9,F5,C5,D5,36,B2,E6,01 
, 00,00,03,D6,08, 57,FE,08,D2,EE,E1,C3, F 

2, E1,76, C3, E2, E1,ED,43,B4,E6,32,B6,E6, 
D1,CI,F1,C9,00,00,00,00,00,00,00,00,00 
,00,00,00,00,00,00,00,00,; ; 

100 D6T6 6666,E20E.E5,ED,4B,6C,£6,06,0 
8, ED, 5B, 6E, E6, 16,00,21,00,00,CB,39,30, 
01,19,CB,23,CB,12,05,C2,1 E,£2,22,B0,E6 
, E1,C8, j i 

110 D6T6 @@@@,E230,F5,C5,E5,21,00,00,3 
6,60, E6, 32, B2,E6,CD,D9,E1,36,B6,E6,32, 
B8,E6, J ì 

120 D6T6 @@@6,E245,36,B4,E6,32,BC,E6,3 
E, 08,32,6E, £6,CD,0E,E2,26,B0,E6,36,61, 
E6,32,B2,E6,CD,D9,E1,36,B4,E6,32,6C,E6 
,3E,FF,32,6E,£6,CD,0E,E2,ED, 4B, B0, E6,0 
9>ED,4B,B4,E6,06,00,09,ED,4B,B6,E6,06, 
00,09,22,B6,E6,E 1,CI,FI,C9, ; ; 

130 D6T6 @666,E287,F5,C5,DB,BF,ED,4B,6 
6, E6,79, D3, BF, 78,03, BF, 41,00,00,00,00, 
DB,BE,32,68,E6,C1,F1,C9,F5,C5,36,BC,E6 
, 47, 36, BD, E6, flF, 0D, C2,6C, E2,05, C2,68, E 

2, CI,FI,C9, i ; 

140 D6T6 @6@6,E2B7,F5,C5,E5,26,B6,E6,0 
1,00,20,09,22,63,E6,36,BE,E6,32,65,E6, 
CD,71,E1,E1,C1,F1,C9, ; ; 

150 D6T6 @e@e,E2Dl,F5,C5,E5,01,00,00,3 
6,B8,E6,4F,21,E2,E2,09,C3,E6,E2,80,40, 
20, 10,08,04,02,01,46,26,B6,E6,22,66,E6 
,CD,87,E2,36,68,E6,B0,32,65,E6,22,63,E 
6,CD,71,E1,E1,C1,F1,C9,;; 

160 D6T6 @666,E350,F5,C5,D5,E5,F3, 16,0 

3, 1E, 05,26,08, ED,4B,D4,E6,ED,43,66,E6, 
03,ED,43,D4,E6,CD,87,E2,36,68,E6,32,D2 
, E6,CD,25,E4,ED, ; ; 

170 D6T6 eeee,E375,4B,D0,E6,E5,21,28,0 
0,09,22,D0,E6,E1,25,C2,5B,E3,26,00,E6, 
01,38,01,00,ED,42,22,D0,E6,1D,C2,59,E3 
,01,18,01,26,D0,E6,09,22, ; ; 

180 D6T6 eeee,E39D,D0,E6,01,D8,00,26,D 

4, E6, 09, 22, D4, E6,15,C2,57,E3,FB,E1 ,DI, 
CI,FI,C9, ; ; 

190 D6T6 eeee,E400,F3,F5,C5,D5,01,00,3 

C, 3E,E6,16,60,1E,06,32,65,E6,ED,43,63, 
E6,03,CD,71,E1,1D,C2,0D,E4,15,C2,0B,E4 
, DI,CI,F1,FB,C9, ; ; 

200 D6T6 @6@6,E425,F5,C5,D5,1E,E5,ED,4 
B,D0,E6,36,D2,E6,16,08,CB,7F,ED,53,65, 
E6,C6,43,E4,ED,43,63,E6,CD,71,E 1,03,CB 
,07,15,C2,33,E4,DI,CI,F1,C9, ; ; 

210 D6T6 @668,E44E,F3,F5,C5,D5,1E,00,E 

D, 4B,D0,E6,16,08,ED,43,66,E6, CD,87, E2, 
03,36,68,E6,FE,E5,C2,6C,E4,CB,FB,CB,03 
,15,C2,56,E4,7B,ED,48,04,E6,E0,43,83,E 
6,32,65,E6,CD,71,E1,FB,DI,CI,F1,C9, ; ; 

211 D6T6 eeee,E550,36,D6,E6,57,36,05,E 
6,5F,26,DI,E6,ED,4B,D3,£6,22,66,E6,CD, 
87,E2, 36,68,E6,ED,43,63,E6,32,65,E6,CD 
,71,E1,03,23,1D,C2,5F,E5,01,00,01,26,D 
1,E6,09,22,D1,E6,26,D3,E6,09,22,D3,E6, 

15, C2, 54,E5,C9, ; ; 

212 D6T6 eeee,E590,F3,CD,50,E5,01,00,2 
0,26,D7,E6,09,22,D1,E6,26,D9,E6,09,22, 
D3, E6, CD,50,E5,FB,C9, ; ; 

213 D6T6 eee@,E500,F3,01,00,E7,26,FE,E 
5,16,C0,1£,20,06,32,65,£6,22,63,E6,CD, 
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come muoversi passo passo con facilità nel 
labirinto del computer. 

Questo corso è dedicato a tutti coloro che hanno ac¬ 
quistato da poco un home-computer, oppure hanno in¬ 
tenzione di farlo entro breve. 

Intendiamo spiegare «per filo e per segno» le nozioni 
di base ed i programmi principali che occorrono a 
chiunque voglia sfruttare pienamente le potenzialità 
del proprio elaboratore. 

IL CORSO SI 
ARTICOLA IN 

8 DISPENSE 

INSERITE CIASCUNA 
AL CENTRO DELLA RIVISTA 


NON MANCATE DI ACQUISTARE 
PUNTUALMENTE “LIST” 

PER COLLEZIONARE 
IN VOLUME 
QUESTO PREZIOSO 
CORSO 


Segue a pag. 63 


54 


LIST 4 



SOMMARIO 




• PERCHÈ IMPARARE A PROGRAMMARE 

• COME SI FANNO I PROGRAMMI 

• I LINGUAGGI DI PROGRAMMAZIONE 

• COM’È FATTO UN LINGUAGGIO 

• LE PAROLE DEL BASIC 




PRIMA PARTE 


■ I LINGUAGGI DI 

PROGRAMMAZIONE 

Sinora abbiamo studiato quali sono i "pezzi” (cioè 
l’hardware) che occorrono per poter usare comoda¬ 
mente un computer come il Commodore 64: 

* la tastiera (che contiene il processore e la memoria 
interna); 

* un video (televisore normale o monitor); 

* la memoria di massa (registratore o floppy disk dri¬ 
ve). 

Collegati i vari pezzi del sistema, e accesi nell'ordine 
giusto (l’unica regola da ricordare è la seguente: ac¬ 
cendete sempre la tastiera per ULTIMA, e spegnetela 
per PRIMA), a questo punto i casi sono due: 
a) volete usare il computer con un programma fatto 


da altri (es: un viideogioco); in questo caso, come 
abbiamo visto la volta scorsa, basta inserire la cas¬ 
setta nel registratore (oppure il disco nel drive), e 
scrivere LOAD e poi RUN. 

A seconda delle vostre necessità, bisognerà ag¬ 
giungere altri “pezzi” al sistema: per esempio, per 
giocare occorre almeno un joystick, mentre per 
usare il computer come macchina per scrivere vi 
occorre una stampante (ne parleremo prossima¬ 
mente). 

b) Avete un qualsiasi problema e volete costruire da 
soli il programma che lo risolve. Progettare un pro¬ 
gramma è un'attività complessa, ma creativa ed 
estremamente gratificante, una volta che siete riu¬ 
sciti a far funzionare il programma. 

In questo caso vi servono parecchie nozioni nuove 
che vedremo in questa e nella prossima parte della 
"Dispensa”. 
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■ PERCHÉ IMPARARE 
A PROGRAMMARE? 

Questa è una domanda molto interessan¬ 
te, anche perché sempre più la scuola si 
sta preparando ad introdurre il computer 
come strumento e materia di studio. Cre¬ 
diamo che esistano tre motivi fondamenta¬ 
li: 

— pratici: il mondo del lavoro richiede 
sempre più alfabetizzazione informati¬ 
ca; 

— strumentali: chi impara a programmare 
impara a capire come funziona e cosa 
può fare grosso modo un computer; 

— culturali: per programmare bene biso¬ 
gna saper ragionare bene. Quindi eser¬ 
citarsi nell’una cosa può favorire l’altra. 
Contrariamente alla credenza comune, 
programmare un computer non è affatto 
complicato. Basta conoscere un linguag¬ 
gio di programmazione, ed aver ben chia¬ 
ra in testa la precisa sequenza di passi 
che il computer deve eseguire. 

La parte veramente difficile è inventare 
tale sequenza di passi, detta ALGORIT¬ 
MO. Un algoritmo è un metodo preciso 
(“meccanizzabile”) di risoluzione di un in¬ 
sieme di problemi. 

Per esempio, le regole che vengono inse¬ 
gnate nella scuola elementare per esegui¬ 
re le 4 operazioni sono algoritmi (“...inco- 


lonnare, sommare cifra 
conto del riporto,...”). 

per 

cifra, tenere 


1 

1 

13 + 

13 + 

13 + 

13+18 = ... -+ 18= -* 

18 = 

-> 18 = 


1* 

31 


Inventare algoritmi è effettivamente un’at¬ 
tività creativa molto più complessa dello 
scrivere programmi. Per fare un parallelo, 
non è difficile imparare a dire qualche fra¬ 
se in una lingua straniera: difficile è dire 
cose sensate e complesse. Una volta in¬ 
ventato l’algoritmo che risolve un proble¬ 
ma, è poi molto semplice scrivere il pro¬ 
gramma in qualsiasi linguaggio. 


Imparare a programmare significa imparare a pensare 
alla maniera del computer. Attualmente i computer 
“pensano” in maniera piuttosto ingenua. Sanno fare 
le 4 operazioni aritmetich, alcune operazioni logiche 
(AND, OR, ecc.), sanno ripetere un ciclo di azioni, 
sanno decider se un certo numero è uguale a un altro. 
Tutto qui. 

Queste operazioni così elementari, quando sono orga¬ 
nizzate in grossi programmi, possono dare 1’impres- 
sione di un comportamento intelligente (es.: program¬ 
mi per giocare a scacchi), semplicemente perché ef¬ 
fettuano un numero altissimo di tali operazioni sempli¬ 
ci in un tempo brevissimo. 

Qualsiasi programma è dunque soltanto un elenco di 
istruzioni (in un qualche linguaggio) per quanto sofisti¬ 
cato sia ciò che appare sul video. Il computer le ese¬ 
gue UNA ALLA VÒLTA, nell’ordine specificato. Se vo¬ 
leste, le potreste eseguire anche voi, ed il risultato 
sarebbe lo stess. In effetti, è come eseguire le istru¬ 
zioni date da un’altra persona per risolvere un certo 
problema. 

COME SI FANNO 
I PROGRAMMI 

Ogni programma è il prodotto di una successione di 
fasi di lavoro ben distinte. Il programmatore parte dal¬ 
la definizione di un problema, concepisce una manie¬ 
ra di risolverlo (l’algoritmo), e dà al computer una se¬ 
rie di istruzioni per trovare la soluzione (il program¬ 
ma). 

Solo quest’ultima fase costituisce la vera programma¬ 
zione del computer. La maggior parte della gente cre¬ 
de che sia difficile. In realtà le fasi difficili, quelle dav¬ 
vero creative e complesse, sono le prime due. 

Come si progetta un programma? Gli esperti di pro¬ 
grammazione arrivano al prodotto finito, il program¬ 
ma, passando attraverso svariate fasi. 

1) Specifica del problema 

Bisogna che abbiate ben chiaro in testa che cosa il 
programma deve fare: il problema che deve risolvere, 
le funzionalità che deve offrire. Cercate, per prima 
cosa di descrivere per iscritto, in italiano, l’obiettivo 
che vi prefiggete. 

Facciamo un esempio: voglio scrivere un programma 
che calcoli il massimo comune divisore di una serie di 
numeri. Questo è il problema di partenza. 


2) Definizione dell’algoritmo 

Definito l’obiettivo, occorre cominciare a pensare alle 
strategie di soluzione: come pensate di risolvere il 
problema? Dovete definire un METODO preciso che, 
passo dopo passo,'garantisca di arrivare alla soluzio- 
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ne. Notate che potete descrivere il vostro algoritmo in 
italiano: per esempio, nel caso del MCD, la matemati¬ 
ca c’insegna che: per calcolare il Massimo Comun 
Divisore di una serie di numeri OCCORRE: 

a) scomporre il primo numero in fattori primi e metter¬ 
li da parte; 

b) ripetere l’operazione di cui sopra per ciascun nu¬ 
mero; 

c) prendere i fattori comuni col minimo esponente; 

d) moltiplicarli tra loro: il risultato della moltiplicazione 
è il MCD cercato. 

Questa è una sequenza di passi definita molto preci¬ 
samente. Se avessimo un computer che sa eseguire i 
singoli passi così come li abbiamo descritti, avremmo 
finito: l’algoritmo sarebbe anche il programma. Sicco¬ 
me in generale questo non succede, occorre tradurre 
le nostre istruzioni in italiano in un linguaggio di pro¬ 
grammazione. 

3) Stesura del programma usando 
un linguaggio di programmazio¬ 
ne. 

A questo punto i casi sono due: 

— tutti i passi dell’algoritmo sono più o meno imme¬ 
diatamente traducibili nel linguaggio di program¬ 
mazione disponibile (nel caso del Commodore 64, 
all’accensione avete il BASIC); questo non succe¬ 
de praticamente mai, se non nel caso di particolari 
problemi matematici (es.: stampa del risultato di 
un’espressione aritmetica); 

— se questo non è possibile, i singoli passi vanno 
analizzati come una nuova serie di sottoproblemi 
del problema iniziale: occorre affrontarli uno per 
uno, dando dei sottoalgoritmi risolutivi. In pratica, 
ciò significa che le fasi 2 e 3 vengono ripetute più 
volte finché non si giunge al prodotto finito: il pro¬ 
gramma scritto nel linguaggio prescelto. Per di più 
può anche darsi che vi accorgiate che l’algoritmo 
dato non riuscite a tradurlo in programma. Occor¬ 
rerà allora inventare un altro algoritmo. 

Per esempio, nel nostro caso, potreste usare al posto 
del precedente il seguente algoritmo, detto di Euclide: 

a) se i due numeri sono diversi, sottrarre il più piccolo 
dal più grosso e ricominciare da capo l’algoritmo; 

b) se i due numeri sono uguali, il MCD è uno dei due: 
fine. 

Questo algoritmo è molto più semplice del primo, ma 
non può essere applicato per calcolare il MCD di più 
di 2 numeri. 

4) Verifica del programma e corre¬ 
zione degli errori 

Scritto il programma, occorre innanzitutto assicurarsi 
che risolva effettivamente il problema di partenza. 

Gli errori possibili sono di due tipi: 

a) errori formali: avete usato scorrettamente il lin¬ 


guaggio di programmazione. Somigliano molto agli 
errori di ortografia o di grammatica che si commet¬ 
tono nello scrivere in italiano. 

Ad esempio, la frase 
“Il cune mangia l,osso’’ 

contiene un errore ortografico ed un errore gram¬ 
maticale: “cune” al posto di “cane” e la virogla al 
posto dell’apostrofo. 

b) errori semantici: il programma è corretto formal¬ 
mente ma non fa quello che volevamo. Sono errori 
di logica: abbiamo scritto male il programma dal 
punto di vista del significato. Per esempio 
“Il fischio disdegna la mucca” 
è una frase corretta sintatticamente, ma senza 
senso. 

La correzione può essere effettuata “a mano”, cioè 
sulla carta, ma è molto meglio farsi aiutare dal compu¬ 
ter in questa fase. Soprattutto gli errori del primo tipo, 
quelli sintattici, sono facili da correggere. 

Poiché tutti i computer, internamente, funzionano me¬ 
diante il linguaggio binario, esistono programmi spe¬ 
ciali, detti TRADUTTORI, che convertono il program¬ 
ma scritto da voi mediante un linguaggio come per 
esempio il BASIC, nel linguaggio della macchina. 
Esistono due tipi di traduttori, a seconda del linguag¬ 
gio che si è prescelto. 

— se avete scelto un linguaggio come il BASIC, avete 
a disposizione un programma traduttore che si 
chiama INTERPRETE che, istruzione per istruzio¬ 
ne, ne controlla la correttezza, formale la traduce 
in linguaggio macchina (linguaggio binario), e la 
esegue immediatamente. 

Quando accendete il Commodore 64, per esem¬ 
pio, è immediatamente attivo questo traduttore 
BASIC: potete direttamente cominciare a scrivere 
programmi in BASIC. 

— se avete scelto un linugaggio come il PASCAL, 
dovete avere a disposizione un programma tradut¬ 
tore che si chiama COMPILATORE. Questo si 
preoccupa esclusivamente di controllare la corret¬ 
tezza formale e poi di tradurre tutto il programma 
in linguaggio macchina, senza eseguirlo. L’esecu¬ 
zione può avvenire soltanto al termine della fase di 
traduzione. 

Per usare il compilatore del PASCAL del C64 
(esempio: OXFORD PASCAL) dovete prima cari¬ 
carlo in memoria da disco. 

La fase di correzione e verifica si svolge in maniera 
molto diversa nei due casi. Se usate un interprete, 
potete correggere gli errori formali e quelli di senso 
man mano che si verificano, in maniera molto natura¬ 
le. 

Se usate un compilatore, invece, dovete correggere 
prima tutti gli errori formali. Solo dopo che avete otte¬ 
nuto un programma sintatticamente corretto potete 
passare alla correzione degli eventuali errori semanti¬ 
ci. Notate che ogni correzione implica poi che ritradu¬ 
ciate (ricompiliate) INTERAMENTE il programma: i 
tempi si allungano. Per questo i programmatori prefe¬ 
riscono i linguaggi per cui è disponibile un interprete 
(BASIC, LOGO). 
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■ I LINGUAGGI DI 

PROGRAMMAZIONE 

Il Commodore 64 è il computer per il quale 
è stata scritta la maggior quantità di soft¬ 
ware di tutti i tempi. Questo vale, non solo 
per i giochi, ma anche per i linguaggi. Chi 
vuole imparare a programmare ha davvero 
una scelta difficile! 

È molto importante che il primo linugaggio 
che si impara sia semplice da capire e da 
usare: infatti, una volta che vi siete impa¬ 
droniti completamente di un linguaggio, 
tutti gli altri sono poi facilissimida impara¬ 
re. Quella che segue è una piccola rasse¬ 
gna di tutti i linguaggi esistenti per il C64. 

m IL BASIC 

Il linguaggio più diffuso per piccoli compu¬ 
ter è il BASIC. È un linugaggio molto sem¬ 
plice, fatto di poche parole e poche regole 
grammaticali. Ciò non significa che sia il 
migliore. Il BASIC è il linguaggio più diffu¬ 
so su microcomputer per ragioni tecniche 
(l’interprete del BASIC è un programma 
piccolo, ed entrava comodamente nelle 
piccolissime memorie interne dei primi mi¬ 
crocomputer), ormai superate dai progres¬ 
si della tecnologia. Esistono decine, centi¬ 
naia di linguaggi. 

Quando accendete il C64, attivate l’inter¬ 
prete BASIC. Questo BASIC è chiamato 
2.0, ed è molto vecchio. Il CI 28 possiede 
un BASIC moto più evoluto, chiamato 7.0. 
Il problema principale col BASIC 2.0 è che 
non possiede istruzioni per fare program¬ 
mi grafici oppure musicali. Per questi do¬ 
vete saper programmare direttamente in 
linguaggio macchina. 

a LE ESTENSIONI BASIC 

Come è noto, il BASIC originale della Com¬ 
modore è il peggiore del mondo, perché è 
povero e largamente incompleto. Per ovvia¬ 
re a queste manchevolezze, sono state rea¬ 
lizzate delle ESTENSIONI; fra queste le più 


famose sono il SIMONS’ BASIC e la SU¬ 
PER EXPANDER 64. In generale una 
estensione mette a disposizione dell’utente 
decine di istruzioni in più rispetto al BASIC 
standard. Oltre a queste due, ricordiamo 
inoltre il LIGHTENING BASIC (Oasis so¬ 
ftware), un prodotto eccellente per chi vuo¬ 
le programmare videogiochi. 

Possiamo catalogare tra le estensioni an¬ 
che un linguaggio come il COMAL (COM- 
mon Algorithmic Language), che è qualco¬ 
sa di mezzo tra BASIC e PASCAL. La ver¬ 
sione per C64 è eccellente. La superiorità 
del COMAL rispetto al BASIC sta nelle 
PROCEDURE. Per il C64 esistono due 
versioni di questo linguaggio: COMAL 0.14 
su disco, e COMAL 2.0 su cartuccia, en¬ 
trambe prodotte dall’associazione utenti 
COMAL (USA). 


COBOL E FORTRAN 

Sono due linguaggi molto famosi, che però 
sono molto complessi e soprattutto posso¬ 
no essere usati su C64 solo col sistema 
operativo CP/M. Questo significa che o 
possedete un Commodore 128 e la sua 
unità a dischi 1571, oppure dovete com¬ 
prare, oltre al programma compilatore 
(prodotti dalla NEVADA Software), un’e¬ 
spansione hardware (processore Z80 con 
CP/M). 


PASCAL. C. ADA 

Sono tre linguaggi di alto livello della stes¬ 
sa famiglia, cioè abbastanza simili, tutti 
molto potenti ma difficili da imparare. Il 
PASCAL è il linguaggio usato all’università 
per insegnare a programmare. Il C è un 
linguaggio del 1972 oggi molto popolare: 
le sue particolarità sono la trasportabilità, 
cioè l’usabilità su più computer senza bi¬ 
sogno di cambiare i programmi, e l’effi¬ 
cienza nell’esecuzione. Sarà il linguaggio 
fondamentale del nuobo AMIGA. 

ADA è un linguaggio nuovissimo, di pro¬ 
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prietà del Pentagono (il minister della Dife¬ 
sa USA). È assai complesso, ma certa¬ 
mente sarà uno dei linguaggi più usati nel 
prossimo futuro. 

Per C64 esistono almeno 3 compilatori PA¬ 
SCAL standard (Oxford, DATABecker, 
Abacus), 2 compilatori C (Pro-line e Aba- 
cus) e un analizzatore sintattico ADA (ADA 
training course della Abacus: non serve 
per fare programmi, solo per imparare a 
programmare in ADA). 


■ LOGO 

Il LOGO è forse l’unico linguaggio studiato 
apposta per chi impara per la prima volta a 
programmare, tanto è vero che è usato an¬ 
che da bambini molto piccoli. Ne esiste la 
versione in italiano (Commodore). 

a PROLOG 

È il linguaggio del futuro. Basato sulla logi¬ 
ca, diretto discendente degli studi aristote¬ 
lici sui sillogismi, è stato scelto come lin¬ 
guaggio macchina dei computer di 5 a ge¬ 


nerazione perché estremamente potente 
nel trattamento di problemi che richiedono 
“intelligenza”. La versione su C64 non è 
ancora commercializzata in Italia. 


FORTH 


Un linguaggio poco conosciuto ma estre¬ 
mamente interessante. Sviluppato per ap¬ 
plicazioni nel campo del controllo numeri¬ 
co, è usato da una ristretta elite di “aficio- 
nados”, perché un po’ complesso da im¬ 
parare. Per il C64 ne esistono almeno 5 
versioni (Enhanced, Abacus, Master, Sixty 
Forth, Superforth + Al). Di queste la più 
interessante è l’ultima, perché facilita an¬ 
che la creazione di programmi “intelligen¬ 
ti”, come per esempio i sistemi esperti. 


■ PILOT 

È un linguaggio autore, cioè uno strumen¬ 
to che permette di scrivere programmi di 
tipo educativo. La versione su C64 è Com¬ 
modore originale. 


COM’È FATTO 
UN LINGUAGGIO 


Esattamente come i linguaggi “naturali”, un linguag¬ 
gio artificiale come il BASIC è fatto di parole e regole 
per usarle. Le parole sono di 4 tipi: 

a) Tipi di dato 

b) Comandi 

c) Istruzioni 

d) Operatori e funzioni 

I TIPI di DATO sono le cose di cui si può parlare nel 
linguaggio: numeri interi, numeri con la virgola, valori 
logici, parole. Possono essere dati semplici, cioè sin¬ 
goli, oppure complessi: insiemi di numeri, sequenze di 
parole, ecc. 


Ogni linguaggio ha tipi di dato particolari: magari ha 
numeri e parole, ma non valori logici. 

Le FUNZIONI, o OPERAZIONI, sono parole che si 
usano dentro i programmi, ma non da sole: debbono 
far parte di un’istruzione. Fanno parte di questo insie¬ 
me gli operatori aritmetici come 
+ * - / 

gli operatori trigonometrici come 
seno, coseno, arcotangente 

e infine le funzioni di manipolazione delle parole (con¬ 
catenazione, sottostringa, ecc.). Esistono poi molte al¬ 
tre funzioni speciali, ad esempio legate alle opzioni di 
stampa. 

I COMANDI sono parole che generalmente NON si 
usano dentro i programmi: servono per manipolarli 
dall’esterno. Per esempio, la parola PER del LOGO 
attiva l’editor; la parola RUN del BASIC attiva l’inter¬ 
prete. Tra i comandi più importanti troviamo quelli di 
memorizzazione su memoria esterna. 


-- - - ■— - ■— 

■: ili liti* «II* 11*111 

istilli liiill Sii limi Siili « Ili il li II I 

MISI!! 

SI li SI il: ili! Sì li II 11 II in '■ I IH ili! SS il III 11 I 
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Le ISTRUZIONI sono invece le parole di cui sono fatti 
i programmi: per esempio l’istruzione condizionale del 
LOGO 

SE ... ALLORA ... ALTRIMENTI... 


oppure l’assegnamento ad una variabile del BASIC: 
LET a = 1986. 

Va fatto notare che una parola può appartenere a più 
classi: per esempio, l’istruzione PRINT del BASIC è 
sia un’istruzione sia un comando. 

L’altra componente di qualsiasi linguaggio, dopo le 
parole primitive, sono le regole grammaticali. Queste 
specificano completamente la corretta forma globale 
dei programmi e delle singole istruzioni. 

Per fare un paragone, potremmo dire che la gramma¬ 
tica italiana prevede che una frase sia strutturata in 
questo modo: 

FRASE = (soggetto) + (predicato)-(-(complemento). 

Il significato di questa equazione è che la forma gram¬ 
maticale corretta di una frase italiana è scomponibile 
in tre parti: la prima deve essere un soggetto, la se¬ 
conda un predicato e la terza un complemento. Chia¬ 
ramente una grammatica deH’italiano descritta così 
dovrebbe comprendere altre equazioni che specifichi¬ 
no cosa sono i soggetti, cosa sono i predicati, cosa 
sono i complementi. 

Analogamente, in BASIC una riga di programma ha la 
seguente struttura: RIGA-DI-PROGRAMMA = (eti¬ 
chetta) + (istruzioni) 

Per esempio, la seguente è un’istruzione formalmente 
corretta: 

50 PRINT “CIAO A TUTTI”: END 
Il significato di un’istruzione è in genere descritto più 
o meno precisamente nel manuale allegato al linguag¬ 
gio. 

Il problema è che usare l’italiano per spiegare l’effetto 
delle varie parole primitive è assai scomodo, perché 
qualsiasi linguaggio naturale è impreciso e comunque 
il suo uso è soggettivo. 

Per ovviare a questo inconveniente sono stati svilup¬ 
pati formalismi matematici che descrivono precisa- 
mente e senza ambiguità il senso dei vari costrutti 
programmativi, ma nell’ambito di questo corso è fuori 
luogo parlarne, cosicché ci arrangeremo con l’italia¬ 
no. 

Un ultimo punto molto importante per valutare i lin¬ 
guaggi da usare sono gli strumenti che si hanno: 
come si possono scrivere i programmi, come si posso¬ 
no correggere. 

Il C64 offre per il suo BASIC soltanto un editor di 
schermo per scrivere i programmi. Un editor è un pro¬ 
gramma che permette di scrivere un testo. Quello del 
Commodore 64 non è molto potente, essendo stato 
concepito e progettato vari anni fa. Il SIMON’S BASIC 
offre in più alcune funzioni per correggere i program¬ 
mi. 

Il LOGO è assai meglio fornito: intanto l’editor è molto 
più potente (può essere usato come semplice word 
processor) e poi le opzioni di debugging sono molte e 
assai utili. 
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m LE PAROLE DEL BASIC 

Il nome di questo linguaggio è un acroni¬ 
mo: sta per “Beginners All-purpose Sim- 
ple Instruction Code”, cioè “semplice lin¬ 
guaggio generale per principianti”. 
Malgrado tutto il male che si può dirne, 
sarà il linguaggio che useremo nella pros¬ 
sima lezione per dare i primi rudimenti di 
programmazione: in fondo è il linguaggio 
che tutti hanno a disposizione! 

Qui anticipiamo semplicemente il VOCA¬ 
BOLARIO del BASIC 2.0, il BASIC stan¬ 
dard del Commodore 64. 


■ TIPI DI DATO 

Possiamo usare dati di due tipi: semplici e 
complessi. 

Semplici: Complessi: 

numeri interi vettori 

numeri con la virgola archivi 
stringhe 

Mancano i valori logici (VERO, FALSO), 
che sono sostituiti quando occorre con va¬ 
lori numerici: lo zero è il FALSO, qualsiasi 
altro numero rappresenta il VERO. 

■ OPERATORI E FUNZIONI 

aritmetici: *,+,-,/,** (elevazione a po¬ 
tenza);* * 

relazionali: >, <, =, <>, >=, <=; 
matematici e trigonometrici: SOR, SIN, 
COS, ATAN; 
logici: NOT, OR, AND; 


casuali: RND; 

su stringhe: + (concatenazione); LEFTS, 
MID$, RIGHT$ (sottostringhe); 


■ ISTRUZIONI 

condizionale: IF ... THEN ... 
iterazione: FOR ... STEP ... / NEXT 
salto: GOTO ... 

sottoprogramma: GOSUB ... / RETURN 
scelta: ON ... GOTO ... 
stampa: PRINT 

lettura da tastiera: INPUT, GET 
lettura dati dentro il programma: DATA ... / 
READ ... 

assegnamento a variabile: LET ... = ... 
interruzione del programma: STOP 
fine programma: END 


■ COMANDI 

mostra il contenuto della memoria interna: 
LIST 

cancella la memoria interna: NEW 
azzera le variabili: CLR 
esegui: RUN 

carica da memoria esterna: LOAD 
salva su memoria esterna: SAVE 
continua l’esecuzione dopo uno STOP: 
CONT 

accesso ad archivi di dati: OPEN, IN¬ 
PUT#, PRINT#, GET#, CLOSE 

NOTA: in BASIC quasi tutte le istruzioni 
possono essere usate come comandi. 

Nella prossima lezione introdurremo i pri¬ 
mi rudimenti della programmazione BA¬ 
SIC. 


^"SCRIVERE 


COL 

COMPUTER 


a* 0 ' . 

c\\' eXe 0^® 
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I LINGUAGGI SU VIDEOCASSETTA 


Dopo Libri, manuali e volumi ecco un nuovo sistema per 

linguaggi del computer. 


imparare i 


In questi ultimi anni, l’editoria specializzata, ha sforna¬ 
to decine e decine di volumi sui vari linguaggi di pro¬ 
grammazione, dal BASIC e le sue estensioni, al CO¬ 
BOL, FORTRAN, ALGOL, FORTH, PILOT etc. etc. 
Da poco tempo, invece, precisamente dall’avvento del 
“videoregistratore”, c’è un nuovo modo per imparare, 
più efficace e più sbrigativo: apprendere attraverso la 
visione di videocassette. Cosi risutla molto più pratico 


anche l’apprendimneo dei linguaggi per la program¬ 
mazione. Svariate Ditte hanno messo a punto dei veri 
e propri “Videocorsi per computer” in raccolte com¬ 
plete che vanno dalle 3 alle 6 videocassette. 

In altra parte della rivista e in un prossimo futuro ci 
occuperemo dettagliatamente di questi “videomanua¬ 
li”; per ora vi diciamo quali sono tutte le Ditte che 
producono e/o distribuiscono queste videocassette. 


C.G.D. VIDEOSUONO 
COMMODORE Italiana 
INIZIATIVE DIDATTICHE 
IPR 
RAI 

TECNEDIT 
TORINO VIDEO 
UNIVERSAL VIDEO 


- via Quintiliano, 40 - 20138 Milano - Tel. 02/50840 

- via F.lli Gracchi, 48 - 20092 Cinisello Balsamo (MI) - tei. 02/61832 

- via Antonio Dionisi, 59 - 0015L Roma - Tel. 06/5373714 

- via Massarenti, 202 - 40138 Bologna - Tel. 051/301905 

- v.le Mazzini, 14 - 00195 Roma - Tel. 06/36864223 

- via F. Confalonieri, 2 - 00195 Roma - Tel. 06/352087 

- via S. Secondo, 48 bis - 10128 Torino - 011/50048 

- via del Tintoretto, 88 - Roma - Tel. 06/5410592 



Ecco dalla Commodore un esempio di “videocorso BASIC’’ su cassette. Sono 15 lezioni per un totale di 9 ore su 3 
videocassette da 3 ore ciascuna. Inoltre, nella confezione, sono compresi un dischetto con esercitazioni e un manuale con 
esercizi e dispense. 


LIST 4 



























Continua da pag. 54 



/I , tl ) 0J, 23, UJ, L^, V3t>, t3) 13|U^»!3|tOirO 

i C9,ìJ 

214 DATA @@@@,E521,F3,2A,FE> E5> 01,00,E 
7, 16, C0, 1E,20,22,A6,E6,CD,87,E2,3A,A8, 
E6,02,03,23,1D,C2,2C,E5,15,C2,2A,E5,FB 
,C9,j ; 

220 DATA @@@@,E600,FS,C5,D5,E5,F3,16,0 
3,1E,05,26,08,CD,4E,E4,ED,4B, D4,E6,03, 
ED,43,D4,E6,E5,21,28,00,ED,4B,00, E6,09 
,22,D0,E6,E1, ; ; 

230 DATA @@@@,E624,25,C2,08, E6,2A,D0,E 
6,01,38,01,ED,42,22,D0,E6,1D,C2,09,E6, 
01,18,01,2A,D0,E6,09,22,00,E6,01,08,00 
,2A,D4,£6,09,22,D4,E6,15,C2,07,E6,FB,E 


1,U1,C1,F1,ca, ;; 

1000 CLS:RESTORE 1060 
1010 FOR 1=*,HFF00 TO &HFFA2 
1020 READ D* :D=UAL("*,H"rD*3 
1030 CURSOR 10,10 :PRINTHEX*(13 
1040 POKE (I3,D 
1050 NEXT I 

1060 DATA E5,D5,F5,2A,F0,FF,1E,00,7E,F 
E,40,CA,1C,FF,7C,FE,00,CA,18,FF,23,C3, 
06,FF,C3,27,FF,00,1C,23,7B,FE,04,CA,27 
,FF,C3,08,FF,22,F0,FF,F1,DI,E1,C9 
1070 DATA F5,3A,F2,FF,FE,3D,F2,41,FF,3 
A,F2,FF,CB,AF,CB,A7,C3,49,FF,3A,F2,FF, 
CB,DF,3C,CB,B7,32,F3, FF,FI, C9 


1080 DATA CD,57,FF,57,CD,57,FF,5F,C9,7 
E, 32, F2,FF,CD,2E,FF,3A,F3,FF,07,07,07, 
07,47,23,7E,32,F2,FF,CD,2E,FF,3A,F3, FF 
,B0,23,C9 

1090 DATA 21,00,90,22,F0,FF,CD,00,FF,3 
A,FI, FF,FE,00,C2,86,FF,C9,2A,F0,FF,23, 
7E,FE,3B,CA,7A,FF,CD,4E,FF,23,7E,FE,3B 
, CA, 7A, FF, CD, 57,FF,12,13,C3,93,FF,C3,7 
4, FF 

2000 CLS :PRINT"CARICAMENTO CODICI 1 ' 

2010 CALL &HFF74 

2020 PRINT:PRINT“CARICAMENTO EFFETTUAT 
0" 

2030 END 


2 REM X 


* 

195 

IF 

E* =l 

"F" THEN 

GOSUB 

2900 

3040 

IF E#="N" THEN SCREEN 2,2:G0T0 11 

3 REM * 

Programma : DISEGNO 

* 

200 

IF 

E*=‘ 

'0" THEN 

3000 


0 


4 REM * 


* 

205 

IF 

£*=' 

’D" THEN 

8EEPJP0KE (&.HE6C23, 

3050 

GOTO 3020 

5 REM * 

by Enr1 co Brunero 

* 

210 

IF 

E*= 

"U" THEN 

GOSUB 

3100 

3100 

GOSUB 7500 

6 REM * 


* 

211 

IF 

E*= 

"R" THEN 

GOSUB 

4700 

3110 

CI=CN:GOSUB 7600 

7 REM * 

via Borgo D’Ale 27 

* 

220 

IF 

E$= 

"M" THEN 

GOSUB 

3200 

3115 

SPRITE 3,(225,1701,2,CI 

8 REM * 


* 

230 

IF 

E*= 

"K" THEN 

GOSUB 

3300 

3116 

BEEP 

9 REM * 

ALICE CASTELLO (Uercell1 

13 * 

240 

IF 

E*= 

"G" THEN 

GOSUB 

4000 

3120 

RETURN 

10 REM* 


* 

250 

IF 

E*= 

"T" THEN 

GOSUB 

4500 

3"’00 

GOSUB 7500 

11 REM,******************************* 

270 

IF 

E* = 

"9" THEN 

6000 


3210 

C2=CN:G0SUB 7600 

12 REM 



280 

IF 

E*= 

"H" THEN 

7000 


3215 

SPRITE 6,(225,1801,2,C2 

13 REM 



290 

IF 

E*= 

"U" THEN 

GOSUB 

10000 

3216 

BEEP 

20 PATTERNS80,"F8F0F8FCBE1F0E04" 


300 

IF 

E*= 

"0" THEN 

GOSUB 

10500 

3220 

RETURN 

21 PATTERNSttl,"FFFFFFFFFFFFFFFF" 


310 

IF 

E*= 

"U” THEN 

POKE(&HE3103, &.HC9 

3300 

R=1 :RA= 1 :X=PEEK(S.HE6A01 :Y=PEEK(8,H 

22 PATTERNS42,"0000183C3C180000" 


320 

IF 

E*= 

"1" THEN 

POKE(&-HE3103, &.HF5 

E6A13 

23 PATTERNSH3,"8142240000244281" 


330 

IF 

£♦= 

"Q" THEN 

GOSUB 

11000 

3310 

BEEP 

24 PATTERNS410,“FF80808080808080" 


340 

IF 

ASC(E* 3 =30 

THEN GOTO 12000 

3320 

GOSUB 3500 

25 PATTERNS«11,"FF01010101010101" 


350 

IF 

ASC(E*3=31 

THEN GOSUB 13000 

3330 

E=STICK(1I:A=STRIG(11 

26 PATTERNS#12,"80808080808080FF” 


500 

GOTO 110 



3340 

IF E=3 AND R<70 THEN GOSUB 3600 :R 


27 PATTERNS#13,“01010101010101FF" 

30 S=».H50 :N=S.H3P :Cl=fcH0i :C2=iH0F :CO=*,H 
1F :X=0 :Y=0:CS=1 

31 GOSUB 9600 

32 GOSUB 9700 

33 POKE C &HE6A03,8<H64 :POKE C 8<HE6A 1 3 > &H64 
:POKE (&HE6C2J,0:POKE(fcHE6C03,1 

35 POKE C8.HE6BE3, CO 

36 SCREEN 2,2 

40 REfl 

41 FOR 1 = 1 TO 15 :COLOR I,I:H=(I*143 

42 CURSOR H,2 :PRINT" “ :NEXT I:COLOR 1, 
15 

50 SPRITE 5,(225,1703,1,14 

51 SPRITE 4,(225,1703,3,1 

52 SPRITE 3,(225,1703> 2,CI 

60 SPRITE 8,(225,1803,1,14 

61 SPRITE 7,(225,1803,3,1 

62 SPRITE 6,(225,1803,2,C2 

70 CURSOR 235,1?2:PRINT" S" 

71 CURSOR 235,182 :PRINT" F" 

80 CURSOR 228,02:PRINT"S N" 

81 LINE (222,1413-C2S5,1443,1,BF 

82 CURSOR 224,155 :PRINT"COLOR" 

90 LINE (229,123-(231,140-(S/23 3, 1,BF 

91 LINE (247, 123-(249,140-(N/23 3, 1 ,BF 
100 SPRITE 0, (PEEK(&HE6A01, PEEK (8.HE6A1 


1000 BEEP 

1005 NO=S 

1010 GOSUB 8000 

1020 GOSUB 9010 

1030 S=NU: GOSUB 3000 

1040 IF E*="2" THEN GOSUB 9700:RETURN 

1050 GOTO 1005 

1500 BEEP 

1505 NU=N 

1510 GOSUB 8000 

1520 GOSUB 9011 

1530 N=NU:G0SU8 9001 

1540 IF E<="2" THEN GOSUB 9600:RETURN 

1550 GOTO 1505 

2000 PAINT (PEEK (8.HE6A03, PE£K(&HE6A1 3 3 
,C1 

2010 RETURN 

2500 BEEP :X=P££K(8.HE6A03 :Y=PEEK(8.HE6A1 
3 

2510 SPRITE 9,CX,Y3,0,C1 
2520 RETURN 

2600 IF X=0 OR Y=0 THEN RETURN 

2610 LINE (X, Y3-(PEEK(8,HE6A03,PEEK(8.HE 

6A133,CI 

2620 GOSUB 8500:RETURN 

2800 IF X=0 OR Y=0 THEN RETURN 

2810 LINE (X,Y3-(PEEK(&,HE6A0 3,PEEK(8,HE 


=Rrl:GOTO 3400 

3345 IF E=1 AND RA>0.10 THEN GOSUB 360 
0:RA=RA-.10=GOTO 3400 

3350 IF E=7 AND R>1 THEN GOSUB 3600:R= 
R-1--G0T0 3400 

3355 IF E=5 AND RA<5 THEN GOSUB 3600 :R 

A=RA+.20 :GOTO 3400 

3360 IF A=1 THEN RETURN 

3370 GOTO 3330 

3400 GOSUB 3500 :GOTO 3330 

3500 CIRCLE (X,'Y),R,C1, RA 

3510 RETURN 

3600 BCIRCLE CX,Y3,R,C2,RA 
3610 RETURN 

4000 BEEP :FOR I=8-HE2E2 TO 8.HE2E9 
4010 POKE (I3.&.H00 
4020 NEXT 1 

4030 POKE (&HE2F71, &HA0 
4060 RETURN 

4500 BEEP GESTORE 4600 
4510 FOR I =&H£2£2 TO 8.HE2E9 
4515 READ R 
4520 POKE (I3,R 
4530 NEXT I 

4540 POKE (&HE2F73,8.HB0 
4550 RETURN 

4600 DATA 128,64,32,16,8,4,2,1 


13,0,13 




6A13 3,CI,B 

4700 

BEEP:FOR I=&,HE2E2 TO S.HE2E9 

110 

CALL &HOFFD 



2820 GOSUB 8500:RETURN 

4710 

POKE (13, &.H00 

120 

E«=INKEY* 

:IF E*=“" THEN 110 

2900 IF X=0 OR Y =0 THEN RETURN 

4720 

NEXT I 

125 

UPOKE ( &<H3B03 3, l 

CS 


2910 LINE (X, Y3-(PEEK(&.HE6A03,PEEK(8,HE 

4760 

RETURN 

126 

BEEP 




6A13 3,CI,BF 

6000 

PATTERNC4234,"80808080808080FF" 

130 

IF E$="S" 

THEN 

GOSUB 

1000 

2920 GOSUB 8500:RETURN 

6001 

R1=PEEK(&,HE6A0)MOD8 

140 

IF E*="N" 

THEN 

GOSUB 

1500 

3000 SCREEN 1,1.-CLS 

6002 

R2=PEEK(iHE6Al3MOD8 

150 

IF E*="P" 

THEN 

GOSUB 

2000 

3010 PRINT"CONFERMI LA CANCELLAI?IONE ? 

6003 

XA=PEEK (&.HE6A0 3 - R1 

160 

IF E*="C“ 

THEN 

GOSUB 

2500 

S-N" 

6004 

YA=PEEK(&cHE6Al 3-R2 

170 

IF E*="L” 

THEN 

GOSUB 

2600 

3020 GOSUB 9500 

6010 

GOSUB 6900 

180 

IF E*="A” 

THEN 

GOSUB 

8500 

3030 IF E*="S" THEN SCREEN 2,2:CLS:G0T 

6030 

E=STICK(13:R=STRIG(13 

190 

IF E*=”B” 

THEN 

GOSUB 

2800 

0 36 

6035 

IF E=0 THEN 6050 


LIST 4 


63 



oro a se 3000 

(jLlZ/l DRAWER 



6040 ON E GOTO 6041,6042,6043,604- 


5,6046,6047,6048 

6041 YB=YA-8:GOTO 6050 

6042 YB=Y6-8:X6=X6+8=GOTO 6050 

6043 Xfl=XP+8 :GOTO 6050 

6044 Y6=Y6+8 :X6=X6i-8 =GOTO 6050 

6045 Y6=Y6+8 :GOTO 6050 

6046 Y(4=Y6+8 :X6=X6-8 :GOTO 6050 


6047 XA=X6-8:G0T0 6050 

6048 YN=Y8-8 :X6=XA-8 :GOTO 6050 

6050 IF Y6'<8 OR Y6>170 OR X6<7 OR Xfì> 1 
88 THEN X8=104:Yfì=72 

6051 IF R=0 THEN 6010 

6052 POKE C8.HE6pn.YP 

6053 POKE C8.HE6P01.XP 

6060 SCREEN l,l:CPLL 8.HE400 

6110 CPLL 8.HE230 

6120 POKE C8.HE6D43, PEEKC8.HE6BPD 

6130 POKE C8.HE6D5 3, PEEKC4.HE68B3 

6150 POKE C8.HE6D0T, 8.H00 

6170 POKE C8.HE6D11, &H3C 

6180 CPLL 8.HE350 

6130 K=ll:L=13:SC=0:CP=0 

6200 IN=K*40+L'+8.H3C00 

6210 PS=UPEEKCIN1 

6220 UPOKE CI NI,144 

6240 ON STICKC13 GOTO 6242,6243,6244,6 
245,6246,6247,6248,6243 

6241 GOTO 6300 

6242 K=K-1:QOTO'6250 

6243 K=K-1:L=L+l;GOTO 6250 

6244 L=L+1JGOTO 6250 

6245 K=K+1 :L=L+1-'GOTO 6250 

6246 K=K+1 iGOTO 6250 

6247 K=K + 1 :L=L-1:GOTO 6250 

6248 L=L-1:GOTO 6250 

6243 K=K-1-L=L-1:GOTO 6250 

6250 IF K>23 OR K<1 OR L<1 OR L>39 THP 

N 6260 

6255 GOTO 6235 
6260 IF K>23 THEN K=23 
6270 IF K<1 THEN K=0 
6280 IF L<1 THEN L=0 
6230 IF L>39 THEN L=33 
6235 GOTO 6400 

6300 E*=INKET$ : IF E* = "‘' THEN 6400 
6310 IF E*=“1“ THEN BEEP sSC=l :CP=0 

6320 IF E$="2" THEN BEEP:SC=0:CP=1 

6321 IF E$=”0‘' THEN CPLL 8.HE400 : GOTO 6 
200 

6322 IF E*="6" THEN SCREEN 2,2=G0T0 66 
81 

6325 IF E*="9" THEN UPOKE CI NT , PS : GOTO 
6600 

6400 UPOKE C INI, PS : IF STRIGCUOl THEN 
6200 

6410 IF SC=1 THEN UPOKECINI,229 : GOTO 6 
200 

6420 IF CP=1 THEN UPOKE CINI,234:GOTO 6 
200 

6430 GOTO 6200 
6600 SCREEN 2,2 

6620 POKE (&.HE6D43, PEEK C8.HE6BPJ 
6630 POKE C&.HE6D53, PEEK C 8.HE6BB3 


6650 POKE C8.HE6D03, &.H00 
6670 POKE C&.HE6D11,8.H3C 

6680 CPLL 8.HE600 

6681 SPRITE 0,C0,1921,10,8 

6682 SPRITE 21,C0,1923,11,8 

6683 SPRITE 22,C0,1923,12,8 

6684 SPRITE 23,C0,1921,13,8 
6690 GOTO 100 

6300 SPRITE 0,CXP-l.YP-23,10,13 
6910 SPRITE 21,CXP+33,YP-21,11,8 
6920 SPRITE 22,CXP-1,YP+161,12,8 
6930 SPRITE 23,CXP+33,YP+161,13,13 
6940 RETURN 

7000 XP=PEEKC8.HE6P03 :YP=PEEKC8.HE6P11 
7010 XP=XP-XP nOO 8 :YP=YP-YP flOD 8 
7020 ID=8:IG=8 

7025 GOSUB 7400 

7026 IF INKEY*=" " THEN 7100 

7027 IF INKEY$= ,, P'' THEN 6681 
7030 GOSUB 7450 

7035 IF R=1 THEN 7060 

7040 IF J = 1 THEN YP=YP-8:G0T0 7050 

7041 IF J=3 THEN XP=XP+8:GOTO 7050 

7042 IF J =5 THEN YP=YP + 8:GOTO 7050 

7043 IF J=7 THEN XP=XP-8=GOTO 7050 
7050 GOTO 7025 

7060 REFI 

7070 IF' J=1 PND IG>8 THEN IG=IG-8:G0T0 
7080 

7071 IF J=3 THEN ID=ID+8:GOTO 7080 

7072 IF J=5 THEN IG=IG+8=GOTO 7080 

7073 IF J=7 PND ID>8 THEN ID=ID-8:GOTO 
7080 

7080 GOTO 7025 

7100 FOR 1=1 TO 5:PRINTCHR«C71:NEXT I 

7105 SX=XP:SY=YP 

7110 GOSUB 7450 

7120 IF R=1 THEN 7200 

7140 IF J=1 THEN YP»YP-8:GOTO 7150 

7141 IF J=3 THEN XP=XHi-8 :GOTO 7150 

7142 IF J =5 THEN Y8=>Y8t8 : GOTO 7150 

7143 IF J=7 THEN XP=XP-8:GOTO 7150 
7150 GOSUB 7400 

7160 IF INKEY4="8" THEN 6681 
7170 GOTO 7110 

7200 BEEP :POKE C8.HE6P11,SY 

7201 POKE C &.HE6P01, SX 

7202 CPLL 8.HE230 

7210 POKE C8.HE6D11, PEEKC&.HE6863 

7211 POKE C8.HE6D23 , PEEKC8.HE68B3 

7212 POKE C8.HE6D71,PEEKC8.HE6BPJ 

7213 POKE C8.HE6D81 , PEEKC8.HE68B3 

7215 El = ID/8+l JPOKE C8.HE6D53, El*8 

7216 E2=IG^8+1 :POKE C8.HE6D63.E2 

7220 POKE C8.HE6P11, YP 

7221 POKE C&HE6P01,XP 

7222 CPLL S.HE230 

7230 POKE C8.HE6D33 ,PEEKC8.HE6BR3 

7231 POKE C8.HE6D43, PEEKC&.HE6BB1 

7232 POKE C&.HE6D93 , PEEKC&.HE6BP1 

7233 POKE CS.HE6DP1, PEEKC&.HE6BB3 
7300 CPLL S.HE590 

7310 GOTO 6681 

7400 SPRITE 0,CXP-1,Yp-21,10,8 


7410 SPRITE 21,CXP-1,YP+IGJ,12,13 
7420 SPRITE 22,CXP+ID+1,YP-21,11,13 

7430 SPRITE 23,CXP+IO+1,YP+IGl,13,8 

7431 IF XP>4 PND Yp>4 PND XPtID<220 PN 
D YP+IG<185 THEN 7440 

7432 YP=88:XP=104:IG=8:ID=8 
7440 RETURN 

7450 J=STICKC13:R=STRIGC13 
7460 RETURN 

7500 CN=INTCPEEKC«<HE6P01/141 

7510 RETURN 

7600 00=01*16+02 

7610 POKEC8.HE6BE3, CO 

7620 RETURN 

8000 GOSUB 3500 

8010 IF E*=''l" PND NU> 10 THEN NU=NU-10 
:RETURN 

8020 IF E* = "2" PND NU>1 THEN NU=NU-1:R 
ETURN 

8030 IF E*= l, 3‘' PND NU<255 THEN NU=NU+1 
: RETURN 

8040 IF £*=''4'’ PND NU<245 THEN NU=NU+1 
0 JRETURN 
8050 RETURN 

8500 SPRITE 3,C0,1921,0,CI 
8510 X=0 :Y=0 :POKE C&.HE6C21,0 :RETURN 
3000 LINE C229,121-C231,140-CS/211,1,B 
F:RETURN 

9001 LINE C247,123-C249,140-CN/233,1,B 
F:RETURN 

9010 BLINE C223,121-C231,140-CS/233,1, 
BF :RETURN 

9011 BLINE C2471121-C243,140-CN^211,1, 
BF :RETURN 

9500 E*=INKEYS : IF E*="" THEN 9500 

9510 RETURN 

3600 POKE C 8.HE6P91, N 

9601 POKE C&.HE6PP1, N 

3602 RETURN 

9700 POKE C&.HE6BC1, S 

3701 POKE C&.HE6BD1, S 

9702 RETURN 

10000 SCREEN 1,1 :CLS 

10010 PRINT "Inserisci la strin 9 a : " 

10020 PRINT :PRINTSPRINT 

10035 PRINTsINPUT. " —> "JST$ 

10040 SCREEN 2,2 sRETURN 
10500 X=PEEKCtHE6p01 :Y=PEEKC8.HE6P11 
10510 IF ST*="" THEN RETURN 
10520 CURSOR X,Y:pRINTSTs:ST*=”" 

10530 RETURN 
11000 GOSUB 7500 
11010 CS=CN 

11015 UPOKE C8.H3B03 3, CS 
11020 RETURN 

12000 POKE C&.HE5FE 1, 8.H00 
12010 POKE C8.HE5FF3, 8.H00 . 

12020 BEEP :CPLL 8.HE500 :SCREEN2,2 

12021 BLINE C229,123-C231,1403,,BF 

12022 BLINE C247,123-C249,1403,,BF 

12023 GOTO 40 

13000 POKE C&.HE5FE3, &H00 
13010 POKE C8.HE5FF 3 , 8.H00 
13020 BEEP :CPLL &.HE521 sRETURN 


ROUTINES IN LINGUAGGIO MACCHINA 


&HEOOO-&HE07C È la parte principale del programma, gestisce il movimento dello sprite, permette schiac¬ 
ciando il tire del joystick la scrittura, permette di cancellare e di ottenere l’effetto specchio. &HE100-&HE164 
Controlla la posizione del joystick e decrementa o incrementa opportunamente le cordinate dello sprite. 
&HE165-&HE170 Legge la posizione del joystick. &HE171-&HE189 Routine per scrivere nella memoria 
VRAM. Indirizzo in esadecimale memorizzato in (&HE6A3-&HE6A4) &HE6A3 parte bassa, &HE6A4 parte 
alta. Dato da trasmettere memorizzato in &HE6A5, &HE18A-&HE1C3 Controlla che lo sprite non vada fuori 
dai limiti prefissati. 8iHE1C4-8iHE1D8 Routine di ritardo per lo spostamento. 8rHE1D9-&HE286 Esegue 


calcolo: Indirizzo grafico = INT (Y/8)‘256+ INT (X/8)*8 + Y MOD 8 &HE287-&HE2A1 Routine per leggere \ 

nella memoria VRAM Indirizzo memorizzato in (&HE6A6-&HE6A7) Dato memorizzato in (&HE6A8) &HE2A2- 
&HE2B6 Ritardo per la scrittura. &HE2B7-&HE2D0 Gestisce il colore. &HE2D1-&HE304 Effetto specchio. 

8iHE310-8iHE346 Lampeggio cursore. &HE350-&HE3B2/&HE425-&HE485 Routine che effettua l'ingrandi¬ 
mento. 8iHE400-&HE424 Riempie lo schermo di quadrati. &HE600-&HE654 Riporta il disegno ingrandito allo 
stato normale in screen 2,2 &HE560-8iHE5AA Duplica una parte di disegno, &HE5Q0-&HE521 Salva il 
disegno in memoria. &HE522-&HE543 Legge il disegno dalla memoria. 
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GESTIONE MAGAZZINO 


QUESTO PROGRAMMA È DISPONIBILE SU CASSETTA 0 DISCO PRESSO 
LA REDAZIONE. PER LE ISTRUZIONI DI ACQUISTO CONSUL TA TE LA 
PAGINA DI APERTURA DELLA SEZIONE PROGRAMMI. 


Dopo i fortunatissimi “Elenco Fornitori” 
ed “Elenco Clienti”, ecco un nuovo 
programma a carattere gestionale per il 
vostro Sharp. 



Proseguendo nella nostra po¬ 
litica, tesa a fornire ai lettori 
titolari di piccole aziende pro¬ 


grammi che possano aiutarli 
a meglio gestire la contabilità 
della propria ditta, presentia¬ 
mo in questo numero un pro¬ 
gramma di gestione del ma¬ 
gazzino. 

Il programma permette di trat¬ 
tare un massimo di 720 voci, 
suddivise in 18 gruppi di 40; 
inserimento e ricerca dei dati 
sono semplificati al massimo. 


I valori elaborati sono disponi¬ 
bili sul video oppure stampati 
su carta, sia in modo comple¬ 
to che parziale; per ogni arti¬ 
colo è possibile sapere, in 
qualsiasi momento: 

— quantità venduta dall’ini¬ 
zio dell’anno 

— quantità acquistata e rela¬ 
tivo prezzo medio 

— rimanenza alla fine del¬ 


l’anno precedente 
— giacenza di magazzino 
(saldo) 

ISTRUZIONI PER 
L’USO DEL PROGRAMMA 

Prima di poter utilizzare il pro¬ 
gramma, occorre procedere 
alla sua “inizializzazione”; 
dopo aver trascritto il listato 


£ FERRAHENTR 2000 S.r. 1 . 
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CPSTELNUDUO RP 

3^ Partita IUfl: 03993930581 

GESTIONE PAGAE2IN0 1386 

ARTICOLO UENOITE ACQUISTI RW.SA 

SALDO 

COSTO 

: - CALIBRO INC* 

2? 

10 

24 

7 

12.850 

2 - CALIBRO Art. 23* 

11 

5 

12 

6 

10,680 

3 - PUMA l 

146 

100 

37 

11 

100 

4 - PUNTA api 2 

156 

100 

87 

31 

120 

5 - PUNTA a» 4 

120 

100 

46 

26 

140 

6 - PLINTI aa 8 

58 

100 

25 

27 

160 

7 ~ PUNTA aa ]0 

83 

100 

ii 

22 

220 

8 - IPROriTT. Ks 3 

170 

130 

23 

5 

3,568 

9 - LPROPITT. K a ÌD 

72 

58 

15 

5 

6.800 

10 - IDROP ITT. Ks 30 

28 

25 

6 

3 

15,888 

11 - SPALTO K» 0.1 

543- 

456 

132 

45 

1.200 

12 - STOLTO Ks 0.5 

837 

865 

88 

56 

2,700 

13 - SPALTO Ks 1. 

I.1ÌB 

1,200 

53 

57 

4,500 

14 - STOLTO Ks 3 

124 

36 

34 

6 

21,000 

15 - GIRAUITE Art.05 

36 

0 

48 

12 

0 

16- CIRCUITE Art. 12 

35. 

0 

36 

1 

0 

17 - GIRAUITE Art.15 

32 

48 

48 

4 

. 1.858 

18 - GIRAVITE Art.28 

18 

24 

34 

40 

3,700 

13 - PINZA B/TONPO 

8 

0 

12 

4 

0 

20 - PINZA 3/LUNGO 

6 

0 

e 

2 

0 

21 - PINZA B/OUAORO 

24 

12 

23 

11 

10.700 

22 - CHIODI a» 10 Ks 

20 

25 

2 

7 

4,500 

23 - CHIODI mi 13 K 9 

34 

30 

7 

3 

3,000 

24 - CHIODI Am 20 Ks 

3 

0 

6 

1 

0 

25 - CHIODI aa 30 Ks 

i 

0 

4 

3 

0 

26 - CHIODI mi* 50 K* 

0 

0 

! 

1 

0 

27 - CAUO BIP.aa 0.2 

212 

0 

235 

23 

0 

28 - CAUO 8IP.aa 0.3 

433 

300 

124 

183 

300 

23 - CAUO TRIPOLARE 

. 21 

0 

58 

37 

0 

30 - CAUO T.U. 

1,650 

1,500 

240 

50 

350 

31 - SPINA P/PICCPLO 

130 

100 

56 

66 

300 

32 - SPINA P/GRANPE 

58 

50 

78 

30 

500 

33 - SriNA TRIPOLARI 

63 

10 

76 

21 

600 

34 - PRESA DURO PICC 

12 

0 

34 

22 

0 

35 - PRESA PURO GRAN 

12 

0 

24 

12 

0 

36 - LADPAPA 15 U 

65 

48 

25 

8 

250 

37 - LADPAPA 25 U 

110 

36 

34 

20 

350 

38 - LADPAPA 4» U 

137 

144 

73 

26 

300 

33 - LADPAPA «0 U 

150 

144 

48 

42 

750 

40 - LADPAPA 75 U 

48 

0 

67 

13 

0 
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CASTELNUOUO 


Rn 




Part i ta 

IUA = 

03333330581 




UlS * GESTIONE 

PAGANINO 

1987 




ARTICOLO 

UENOITE 

ACQUISTI 

Rin.ZA 

SALDO 

COSTO 

1 

- CÀLIBRO INO* 

0 

0 

7 

7 

0 

2 

- CALIBRO Art.234 

0 

0 

6 

6 

0 

3 

- PUNTA AA 1 

0 

0 

11 

11 

0 

4 

- PUNTA min 2 

0 

0 

31 

31 

0 

5 

- PUNTA kk 4 

0 

0 

26 

26 

0 

6 

- PUNTA aa 8 

0 

0 

27 

27 

0 

7 

- PUNTA KK 10 

0 

0 

22 

22 

0 

8 

- IDROPITT. Ks 5 

0 

0 

3 

3 

0 

3 

- IPRPPITT. Ks 10 

0 

0 

5 

5 

0 

10 

- IOROPITT- Ks 30 

0 

0 

3 

3 

0 

ii 

- STOLTO Ks 0.1 

0 

0 

45 

45 

0 

12 

- STOLTO Ks 0.5 

0 

0 

56 

56 

0 

13 

- SPALTO Ks 1 

0 

0 

37 

37- 

0 

14 

- SPALTO Ks 5 

0 

0 

6 

6 

0 

15 

- GIRAUITE Art.05 

0 

0 

12 

12 

1 

0 

16 

- GIRAUITE Art.12 

0 

0 

1 

0 

17 

- QIRAUITE Art.15 

0 

0 

4 

4 

0 

18 

- QIRAUITE Art.28 

0 

0 

40 

40 

0 

13 

- PINZA 6/TONDO 

0 

0 

4 

4 

0 

20 

- PINZA P/LUNGC 

0 

0 

2 

2 

0 

21 

- PINZA B/QUADRp 

0 

0 

11 

11 

0 

22 

- CHIODI in. 10 Ks 

0 

0 

7 

7 

0 

23 

- CHIODI aa 15 Ks 

0 

0 

3 

3 

0 

24 

- CHIODI kk 20 Ks 

0 

0 

1 

1 

0 

25 

- CHIODI aa 30 Ks 

0 

0 

3 

3 

0 

26 

- CHIODI Am 50 Ks 

0 

0 

1 

1 

0 

27 

- CAUO BIP.aa 0.2 

a 

0 

23 

23 

0 

28 

- CAUO BIP.aa 2.5 

0 

0 

183 

183 

0 

23 

- CAUO TRIPOLARE 

0 

0 

37 

37 

0 

30 

- CAUO T.U. 

0 

0 

90 

30 

0 

31 

- SPINA P/PICCOLP 

0 

0 

66 

66 

0 

32 

- SPINA P/GRANDE 

0 

B 

32 

30 

0 

33 

- SPINA TRIPOLARI 

0 

0 

21 

21 

0 

34 

- FRESA DURO PICC 

a 

0 

22 

22 

0 

35 

- PRESA DURO GRAN 

0 

0 

12 

12 

0 

36 

- LADPAPA 15 U 

0 

0 

8 

8 

a 

37 

- LflDPADA 25 U 

0 

0 

20 

20 

0 

38 

- LAprAPA 10 W 

0 

0 

26 

26 


39 

- LAPPAGA 60 U 

0 

0 

42 

42 

0 

40 

- LAPPADA 75 U 

0 

0 

19 

13 

0 
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GESTIONE MAGAZZINO 


mgm 


ed eseguito un accurato con¬ 
trollo della copiatura, inserite 
nel registratore una cassetta 
vergine e battete il comando 
‘‘RUN 1000’’ seguito da 
“CR”. Il computer chiede 
l'immissione dei dati anagra¬ 
fici della vostra Ditta (ragione 
sociale, indirizzo, etc.) e l’an¬ 
no cui si riferisce la contabili¬ 
tà; occorre poi inserire il nu¬ 
mero presunto di articoli da 
gestire, in multipli di 40. Vi 
consigliamo di largheggiare 
nella previsione in modo da 
avere, durante l’anno, ampie 
possibilità di aggiungere nuo¬ 
ve voci; il numero massimo di 
articoli previsti determina, 
con il suo valore, la lunghez¬ 
za del “file” e quindi il tempo 
di lettura e trascrizione dati 
sul nastro. Al termine dell’im- 
missione e conferma dei dati 
anagrafici appare il menù ed 
il computer è pronto a riceve¬ 
re le dovute informazioni. 
Prima di esaminare le singole 
opzioni del menù, occorre 
spiegare le modalità di regi¬ 
strazione dei dati al termine 
di una seduta di lavoro e il ca¬ 
ricamento in memoria di pro¬ 
gramma e dati all’inizio di 
un’altra. 

— Registrazione dati: al ter¬ 
mine di ogni serie di im¬ 
missioni, i dati devono es¬ 
sere registrati su cassetta: 
per semplificare le opera¬ 
zioni, ogni volta viene di 
nuovo registrato anche il 
programma e, immediata¬ 
mente di seguito, il “file” 
di dati. Pertanto, una volta 
scelta l’opzione n. 8, riav¬ 
volgete interamente il na¬ 
stro e seguite le istruzioni 
sul video; un segnale acu¬ 
stico indica il termine del¬ 
la registrazione. 

— Caricamento programma 
e dati: analogamente a 
quanto sopra descritto, al 
caricamento del program¬ 
ma nel computer segue la 
lettura del “file” di dati; 
anche tale operazione è 
automatica purché, all’ini¬ 
zio del caricamento, si im¬ 
posti il comando 
“LOAD:RUN” invece del 
semplice “LOAD” (vedi ar¬ 
ticolo a pag. 26 del n. 2 di 
febbraio 1985 di “LIST”). 

Esaminiamo ora le singole 


opzioni del menù. 

1 — IMMISSIONE GRUPPI 
ARTICOLI 

Poiché ogni “schermata” del 
programma contiene 40 arti¬ 
coli, il numero massimo previ¬ 
sto in sede di inizializzazione 
(N) può essere suddiviso in 
N/40 gruppi; mediante tale 
opzione a ciascun gruppo 
può essere assegnato un 
nome e tale accorgimento fa¬ 
cilita notevolmente la ricerca 
dei singoli articoli. Chiamate, 
pertanto, l’opzione 1 ed inse¬ 
rite i nomi dei gruppi; ogni 
nome può avere un massimo 
di 25 caratteri: i trattini che 
compaiono sullo schermo vi 
aiutano nella valutazione del¬ 
la lunghezza; il programma 
procede fino ad esaurimento 
dei gruppi. Potete correggere 
in qualunque momento i nomi 
inseriti chiamando di nuovo 
l’opzione: i nomi già immessi 
compaiono sullo schermo ed 
è possibile correggerli ovvero 
confermarli premendo sem¬ 
plicemente “CR”; qualora vo¬ 
gliate lasciare uno o più grup¬ 
pi senza alcuna indicazione, 
è sufficiente inserire due vir¬ 
golette e premere “CR”: la 
stringa rimane vuota. 

2 — IMMISSIONE NOME 
ARTICOLI 

Questa opzione viene usata 
ogni volta che dovete inserire 
nuove voci nel magazzino. 
Compare inizialmente l’elen¬ 
co dei gruppi: scegliete quel¬ 
lo in cui volete inserire i nuovi 
nomi. Sono quindi elencate le 
40 voci contenute nel gruppo: 
dopo aver deciso dove inseri¬ 
re il nuovo articolo, immettete 
il relativo numero progressi¬ 
vo; potete ora scrivere il nuo¬ 
vo nome (max. 15 lettere) 
premendo “CR” al termine 
della digitazione. Se le voci 
da inserire sono più di una, è 
sufficiente premere di nuovo 
“CR”: il programma si predi¬ 
spone a ricevere un altro 
nome da inserire in corrispon¬ 
denza del numero progressi¬ 
vo seguente; se, durante l’im¬ 
missione, volete lasciare al¬ 
cuni numeri liberi, inserite 
due virgolette. Al termine del¬ 
l’operazione potete tornare al 
menù premendo “0”. Per 
quanto concerne eventuali 


correzioni dei nomi inseriti, si 
procede come indicato al p. 1 
per i gruppi di articoli. 

3 — IMMISSIONE DELLE 
RIMANENZE 

a - Immissione: quando il 
programma viene usato 
per la prima volta, occor¬ 
re procedere, per tutti gli 
articoli, all’immissione 
delle giacenze di magaz¬ 
zino esistenti alla fine 
dell’anno contabile pre¬ 
cedente. Premendo il ta¬ 
sto “1 ”, compaiono sullo 
schermo, in sequenza, i 
nomi di tutti gli articoli 
immessi: accanto a cia¬ 
scuno occorre inserire 
l’entità delle rimanenze. 
L’operazione procede 
ininterrottamente fino al¬ 
l’ultimo articolo memo¬ 
rizzato: eventuali spazi 
lasciati liberi vengono 
ignorati. Al termine del¬ 
l’immissione, il program¬ 
ma passa automatica- 
mente alla fase di con¬ 
trollo: in tal modo è pos¬ 
sibile controllare, ed 
eventualmente correg¬ 
gere, i valori immessi, 
b - Controllo: mediante tale 
opzione è possibile, in 
qualunque momento, 
controllare, ed eventual¬ 
mente correggere, i valori 
delle rimanenze prece¬ 
dentemente inseriti. 

4 — IMMISSIONE VENDITE 
Scegliete prima il gruppo, 
quindi l’articolo di cui volete 
registrare la quantità vendu¬ 
ta; compare l’ammontare del¬ 
le vendite precedenti mentre 
il computer si dispone in atte¬ 
sa dell’inserimento da tastie¬ 
ra dell’ulteriore vendita: nota¬ 
te che nel punto dove lam¬ 
peggia il cursore è già visua¬ 
lizzato uno zero. Digitale il 
numero da inserire: compare 
la quantità precedentemente 
venduta (aggiornata con l’ulti¬ 
mo valore immesso) mentre il 
computer si predispone per 
una ulteriore immissione; è 
possibile, pertanto, inserire 
più di una vendita dello stes¬ 
so articolo e ciò evita di dover 
eseguire precedentemente 
una somma con la calcolatri¬ 
ce. Per interrompere l’inseri¬ 
mento occorre immettere uno 



zero: in pratica, poiché lo 
zero è già prestampato, è suf¬ 
ficiente premere “CR” senza 
digitare alcun numero; un se¬ 
gnale acustico conferma la 
fine deH’immissione. 

Potete ora scegliere se ag¬ 
giornare le vendite dell’artico¬ 
lo immediatamente successi¬ 
vo o tornare al menù: nel pri¬ 
mo caso occorre premere 
“CR”, nel secondo lo “0”. 

5 — IMMISSIONE ACQUI¬ 
STI 

Scegliete prima il gruppo, 
quindi l’articolo di cui volete 
registrare l’acquisto. Sono vi¬ 
sualizzati la quantità totale 
precedentemente acquistata, 
l’importo totale pagato ed il 
prezzo medio dell’articolo; il 
computer si predispone per 
l’inserimento del nuovo ac¬ 
quisto. Digitate la quantità ac¬ 
quistata e l’importo pagato (al 
netto dell’I.V.A.): viene visua¬ 
lizzato il prezzo unitario che 
deve corrispondere a quello 
indicato nella fattura d’acqui¬ 
sto. Se i dati sono esatti, po¬ 
tete confermare con “CR” al¬ 
trimenti, premendo “C”, po¬ 
tete correggere riprendendo 
dall’inizio; premendo lo “0” 
prima di operare la conferma, 
il programma torna al menù 
ed i dati digitati vengono 
ignorati. Dopo aver operato la 
conferma è possibile, pre¬ 
mendo “Cr”, registrare l’ac¬ 
quisto dell’articolo immedia¬ 
tamente successivo. 

6 — TOTALI E SALDI / VI¬ 
DEO 

Mediante tale opzione è pos¬ 
sibile visualizzare, per cia¬ 
scun articolo, quantità vendu¬ 
te e acquistate, rimanenze al¬ 
l’inizio dell’anno, giacenza at¬ 
tuale (saldo) e costo medio di 
acquisto nell’anno corrente. I 
comandi del cursore consen¬ 
tono di “sfogliare” l’archivio 
in entrambe le direzioni. 

7 _ TOTALI E SALDI / 
STAMPA 

Stampa su carta dei dati de¬ 
scritti all’opzione 6; se la ri¬ 
chiesta va dal cod. 1 fino al 
numero massimo impostato 
(N) sono stampati anche i dati 
anagrafici della Ditta. Inse¬ 
rendo uno zero nel codice ini¬ 
ziale e/o finale, il programma 
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ritorna al menù e la richiesta 
di stampa viene, in pratica, 
annullata. 

8 — REGISTRAZIONE DATI 

Tale opzione va eseguita al 
termine di ogni seduta di la¬ 
voro, per salvare su nastro i 
dati immessi; i dettagli opera¬ 
tivi sono stati già descritti al¬ 
l’inizio delle istruzioni. 

9 — PREDISPOSIZIONE 
NUOVO PERIODO 

Questa opzione è utilizzata a 
fine anno, dopo che tutti i dati 
relativi a vendite e acquisti 
sono stati immessi ed è stata 
eseguita almeno una copia su 
carta della situazione di ma¬ 
gazzino a fine anno; l’opzione 
consente di evitare una reini- 


zializzazione del programma 
per il nuovo anno e quindi di 
dover ripetere le lunghe e 
noiose operazioni di immissio¬ 
ne dei nomi degli articoli, delle 
rimanenze, etc. Una volta ese¬ 
guita la predisposizione, le 
vendite e gli acquisti dell'anno 
precedente sono azzerati, 
mentre i valori dei saldi del¬ 
l’anno appena terminato sono 
automaticamente immessi 
come rimanenze nella conta¬ 
bilità dell’anno successivo; 
eventuali ritocchi delle quanti¬ 
tà in rimanenza possono esse¬ 
re effettuati mediante l’opzio¬ 
ne “IMMISSIONE DELLE RI¬ 
MANENZE — CONTROLLO”. 
A titolo di esempio, in fig. 1 è 
riportata una tipica situazione 


contabile a fine anno (1986) 
mentre in fig. 2 compare la 
stessa situazione dopo la pre¬ 
disposizione del nuovo perio¬ 
do (anno 1987): le rimanenze 
1987 corrispondono ai saldi 
1986 mentre vendite, acquisti 
e costo medio sono stati az¬ 
zerati. 

Come già consigliato per altri 
programmi di contabilità pre¬ 
sentati nei precedenti numeri 
della rivista, è bene eseguire 
una prova con pochi articoli e 
relative vendite e acquisti, 
onde prendere dimestichezza 
nell’uso del programma e po¬ 
ter controllare manualmente i 
totali calcolati dal computer: 
ciò soprattutto allo scopo di 
correggere eventuali errori 



occulti di trascrizione del li¬ 
stato. 

Se doveste, comunque, tro¬ 
varvi in difficoltà, tenete pre¬ 
sente che: 

— ogni volta che il program¬ 
ma richiede l’immissione 
di un valore numerico da 
tastiera, è possibile inter¬ 
rompere la sequenza e 
tornare ai menù inserendo 
uno zero; 

— è possibile, in ogni mo¬ 
mento, interrompere l’e¬ 
secuzione del programma 
premendo “SHIFT e 
BREAK” e riprenderla dal 
menù con il comando 
“RUN 70”: cosi operan¬ 
do, i dati immessi non 
vanno perduti. 


STRUTTURA DEL PROGRAMMA 


Il programma, come dettagliato nelle istruzioni, deve essere “inizia- 
lizzato”: le istruzioni per tale operazione partono dalla riga 1000, e 
da questa inizieremo, pertanto, la spiegazione della struttura. 

R. 1000-1030 Sono richiesti i dati anagrafici della Ditta ed assegnati 
alle var. da DI $ a D4$; ciascuna stringa, prima di 
essere richiesta (INPUT), viene stampata nella stessa 
posizione: in tal modo, in sede di eventuale correzio¬ 
ne dei dati, non è necessario digitare di nuovo le 
stringhe, ma è sufficiente confermarle premendo R.130-160 
“CR”. 

R.1040 Immissione dell’anno in corso (AC) e controllo del 
suo inserimento in modo corretto. 

R.1050 Immissione dei numero massimo presunto di articoli R.170-180 

da gestire (N); viene eseguito il controllo che N sia 
multiplo di 40 (ogni schermata comprende infatti 40 
articoli). 

R.1060-1090 Viene richiesta la conferma (R.1070) o la correzione 
(R.1080) dei dati anagrafici. 

R.1100 Sono visualizzati i dati anagrafici (subr. 2050) e di¬ 
mensionati i vettori (subr.2060); dopo una pausa 
(surb. 2030) il programma prosegue con il menù 
(R.70) R.190-230 

R.60 Sono definiti il tempo musicale per i segnali acustici 

ed il colore dei caratteri e di sfondo. Impostando i 
comandi “LOAD:RUN” il programma passa in esecu¬ 
zione automaticamente: la subr. 2090 legge sul file i 
dati anagrafici che vengono visualizzati (subr. 2050); R.240-260 

si procede al dimensionamento dei vettori (subr. 

2060) e alla lettura dei dati di magazzino (subr. 2100). 

Al termine della lettura la subr. 2110 interrompe Tese- R.270-290 

cuzione del programma, per riprenderla una volta 
premuto il tasto “CR”. 

R.70-100 Viene definita la posizione delle routines di controllo 

degli errori (R.3000) e stampato il menù; l’istruzione 
“ON Z GOTO...” (R.100) consente l’esecuzione del 
numero di opzione scelta. R.300-380 

R. 110-120 Routine immissione gruppi di articoli. Il numero di 
gruppi dipende da quello massimo presunto di articoli 
(N) inserito a R.1050, ed è pari a N/40; il loop K, 
impostato da 1 a N/40, controlla l’inserimento, uno ad 
uno, del nome di ciascun gruppo (B$(K)). Prima della 
sua assegnazione (INPUT B$(K)), il contenuto della 
stringa B$ (K) viene stampato a partire dalle coordina- R.390-470 


te dello schermo in cui si dovrà posizionare il cursore 
(R.120): se la stringa era già stata assegnata (siamo, 
cioè, in fase di correzione), la modifica o la conferma 
possono essere svolte in maniera più spedita, senza 
dover ricorrere ad una nuova, completa digitazione 
dei caratteri. Viene eseguito un controllo della lun¬ 
ghezza di B$(K) (max. 25 caratteri) con iterazione del¬ 
la R.120 fino a che tale condizione non sia soddisfat¬ 
ta (IF LEN(B$(K)...). 

Sono cancellati i trattini-guida del nome precedente, 
quindi si procede con il nome successivo (NEXT K — 
R.130). Viene richiesta la conferma (R.140) o la corre¬ 
zione (R.150) dei nomi inseriti. 

Routine immissione nome articoli. Viene visualiz¬ 
zato l’elenco dei gruppi e scelto il numero progressi¬ 
vo in corrispondenza del quale inserire il nome (subr. 
2150). Il nome da immettere viene assegnato alia var. 
A$(K): il valore di K corrisponde al numero progressi¬ 
vo dell’elenco. Analogamente a quanto descritto nel¬ 
la routine precedente, il contenuto di A$(K) viene pri¬ 
ma stampato (per facilitarne l’eventuale correzione), 
quindi ne viene controllata la lunghezza (R.180) 
Premendo il tasto “CR” (R.200) passa in esecuzione 
la routine di R.220-230 che, incrementando K (R.220) 
e rinviando a R.180 (R.230), consente l’immissione di 
un ulteriore articolo in corrispondenza del numero 
progressivo (K) successivo. 

Routine immissione rimanenza. L’esecuzione pro¬ 
segue da R.270 (se si sceglie l’immissione) o da 
R.300 (se si sceglie il controllo). 

Immissione. Viene impostato il loop K da 1 a N: se la 
stringa A$(K), corrispondente al valore assunto via via 
da K, è nulla (nessun articolo presente), si passa al K 
successivo (R.290). Per ciascun articolo (A$(K)) il va¬ 
lore della rimanenza viene assegnato alla var. 
R(K)(R.280). 

Controllo. Mediante il loop K (R.320) sono visualizza¬ 
ti i valori delle rimanenze (R(K)) di ciascun articolo 
(A$(k))(R.330). Se la quantità viene confermata 
(R.340), l’esecuzione prosegue a R.380 per l’articolo 
successivo; se è necessario correggere (R.350), vie¬ 
ne richiesto il nuovo valore di R(K) quindi l’esecuzio¬ 
ne riprende da R.330. 

Routine immissione vendite. Viene scelto l’articolo 
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R.480-490 


R.500-600 


R. 610-630 


R.640-740 


R.750-760 


R.770-800 


su cui operare (subr. 2150); l’impostazione del loop K 
dal numero scelto (K) fino al termine dell’elenco (N), R.810 

consente l’eventuale passaggio all’articolo successi¬ 
vo (cfr. R.470). Viene stampato il nome dell’articolo 
scelto (R.400) e le vendite precedenti (V(K))(R.410). R.820-930 
La nuova quantità impostata è assegnata ad X (IN¬ 
PUT X - R.420): se X = 0 (non è stato digitato alcun 
numero), si intende esaurita l’immissione di vendite 
per quell’articolo ed il programma prosegue da R.440 
per la richiesta dell’articolo successivo (R.440 - 
R.470) o il ritorno al menù (R.450); se, invece, X è 
diverso da 0, viene aggiunto alla var. V(K) il valore di 
X (incremento delle vendite - R.430) ed il programma 
riprende da R.410 per una ulteriore, eventuale ag¬ 
giunta. 

Routine immissione acquisti. Scelta dell’articolo 
(subr. 2150) e impostazione del loop K per gli even¬ 
tuali passaggi all’articolo successivo (R.480). Viene 
stampata la quantità totale acquistata dall’inizio del¬ 
l’anno (C(K)), l’importo totale pagato (D(K)) nonché il 
prezzo medio (D(K)/C(K)); se l’articolo non è mai stato 
acquistato nel corso dell’anno (C(K) = 0), il prezzo 
medio non viene stampato (R.490). 

Viene richiesta la quantità acquistata (X) e l’importo 
complessivo pagato (Y) (R.500); è stampato il costo 
unitario (Y/X) e richiesta la correzione o la conferma 
(subr.2130)(R.510). Nel primo caso (R.530) il pro¬ 
gramma riprende da R.490 per una nuova immissio¬ 
ne di dati; nel secondo caso l’esecuzione salta a 
R.560 con l'aggiornamento delle variabili C(K) e D(K) 
in base ai valori di X e Y appena immessi e conferma¬ 
ti (R.560). È possibile procedere con l’articolo imme¬ 
diatamente successivo (R.570 - R.600) o tornare al 
menù (R.580). 

Routine totali e saldi video. Scelta dell’articolo 
(subr. 2150) e rinvio al menù se al numero scelto non 
corrisponde alcun nome (R.610). Viene stampato il 
nome dell’articolo scelto (A$(K)) e la legenda esplica¬ 
tiva dei valori stampati; alla var. Y viene assegnato il 
valore del costo medio (D(K)/C(K)) sempre che l’arti¬ 
colo sia stato acquistato almeno una volta nel corso 
dell’anno (C(K) diverso da 0)(R.620). Sono stampati 
la quantità totale venduta (V(K)), acquistata (C(K)), la 
rimanenza (R(K)), la giacenza (C(K) + R(K)-V(K)) ed il 
costo medio (Y)(R.630). 

Viene scelto se visualizzare i dati dell’articolo succes¬ 
sivo (1), precedente (T) o tornare al menù (0)(R.640- 
680). La scelta è resa operativa incrementando 
(R.690-710) o decrementando (R.720-740) di una uni¬ 
tà il valore di K e rinviando l’esecuzione a R.620 per 
la visualizzazione dei dati. 

Routine totali e saldi stampa. Sono visualizzati i 
dati anagrafici della Ditta (subr. 2050) e richiesto il 
codice iniziale (K) e finale (J) di stampa (R.750); se la 
richiesta è completa (K = 1 ; J = N) sono stampati i dati 
anagrafici (subr. 2190). 

Viene stampata la legenda (subr. 2200) ed impostato 
il loop per la stampa del gruppo di codici richiesti (da 
K a J); le stringhe vuote sono ignorate (R.770). Analo¬ 
gamente a quanto descritto per i totali e saldi video, 
sono stampati i dati relativi agli articoli scelti (V(K), 


C(K), etc.). 

Routine registrazione dati. Sono visualizzati i dati 
anagrafici della Ditta (subr. 2050) e registrati su na¬ 
stro programma e dati (subr. 2070). 

Routine predisposizione nuovo periodo. Tale ope¬ 
razione comporta azzeramenti e modifiche delle va¬ 
riabili memorizzate e le confemare richieste da R.820 
a R.890 hanno lo scopo di evitare errori accidentali. 
Mediante il loop K (R.900) e per ciascun articolo: 

— viene assegnato alla rimanenza (R(K)) il valore del 
saldo finale (C(K) + R(K)-V(K)) 

— sono azzerate le vendite (V(K)) e gli acquisti (D(K); 
C(K)) 

— l’anno in corso viene incrementato di una unità 
(AC = AC + 1 ) 

Dopo la pressione di un tasto qualsiasi (R.910-920) 
l’esecuzione del programma ritorna al menù (R.930). 

R.2000-2020 Subr. musicali. 

R.2030-2040 Subr. di pausa durante l’esecuzione del programma. 

R.2050 Subr. per la visualizzazione sullo schermo dei dati 
anagrafici della Ditta. Le istruzioni consentono di ese¬ 
guire il centraggio automatico sullo schermo delle 
stringhe di dati. 

R.2060 Subr. dimensionamento vettori. 

R.2070-2080 Subr. registrazione dati su nastro. Dopo aver premu¬ 
to “CR” (subr.2110) vengono registrati, nell’ordine, il 
programma, i dati anagrafici della Ditta e i dati di 
magazzino. 

R.2090-2100 Subr. lettura dati dal nastro. 

R.2110-2120 Subr. di interruzione dell’esecuzione del programma 
e sua ripresa dopo la pressione del tasto “CR”. 

R.2130-2140 Subr. con messaggi esplicativi sulle opzioni disponi¬ 
bili. 

R.2150-2180 Subr. visualizzazione elenco gruppi e articoli: viene 
attivata ogni volta che si deve ricercare una voce di 
magazzino. Mediante il loop K è stampato l'elenco 
dei gruppi (B$(K)); il numero scelto è assegnato a J 
(R.2150). Dal numero del gruppo si calcolano i nume¬ 
ri progressivi degli articoli compresi in esso 
(J = 40*(J-1 )); mediante i due loops K, i primi 20 arti¬ 
coli (A$(K)) del gruppo sono stampati nella metà sini¬ 
stra dello schermo, mentre gli altri 20 sono stampati 
nella metà destra (TAB(20) - R.2160). Una volta scel¬ 
to il numero (K), la subr. ritorna al programma princi¬ 
pale (R.2170-2180). 

R.2190 Subr. stampa su carta dei dati anagrafici Ditta. 

R.2200 Subr. stampa su carta della legenda per i dati di ma¬ 

gazzino. 

R.3000-3060 Subr. elaborazione degli errori. Quando si immettono 
dati numerici da tastiera mediante l’istruzione “IN¬ 
PUT”, può accadere di inserire accidentalmente dati 
non numerici: in tal caso si verifica l’errore 3 (illegal 
data error) ed il programma si interrompe. Le routines 
da R.3000 a R.3060, mediante l’istruzione "RÉSU¬ 
MÉ”, consentono di riprendere automaticamente l’ese¬ 
cuzione del programma dall’istruzione in cui si è verifi¬ 
cato l’errore. Le istruzioni che precedono “RÉSUMÉ” 
determinano, dopo l’identificazione della riga in cui si è 
verificato l’errore (ERL), l’esatta posizione del cursore: 
ciò permette una correzione più semplice e rapida. 


10 REH*** *** 
20 REH*** GESTIONE MAGAZZINO *** 
30 REH*** BT E.FABRI2I-1386 *** 
40 REO*** SHARP 112-702 *** 
50 REH*** *** 


60 TEMP07:COLOR,,7,0:GOSUB2090 =GOSUB2050 
:GOSUB2060:CURSOR0,17:PRINT"LETTURA DATI 
":GOSUB2100:PRINT"Premere 'STOP' e 'CR'" 
:G0SUB2110 


70 ONERRORGOTO3000:CONSOLE :PRINT "B " :PRIN 
TTABC18)"MENU":PRINT"B1 inHISSIONE GRUPP 
I ARTICOLI":PRINT"B2 inniSSIONE NOME ART 
ICOL I " :PRINT"IB3 IMMISSIONE RIMANENZE" : PR 
INT"B4 UENDITE":PRINf"ffl5 ACQUISTI" 

80 PRINT"B6 TOTALE E SALDI - UIDE0":PRIN 
T"B7 TOTALI E SALDI - STAMPA":PRINT"B8 R 
EGISTRA2IONE DATI"=PRINT"B9 PREDISPOSTI 
ONE NUOVO ANNO":PRINT”BBBPer tornare qI 


menu '0'"- 

30 GET2 : IF2=0THEN30 

100 0N2G0T0110>170,240,390,480,610,750,8 
10,820 

110 PRINT"BB0B000IMMISSI0NE GRUPPI DI AR 
TICOLI":PRINT"B09ni nome max. 25 lettene 
"=FORK=1TONn40 

120 CURSOR0, K+3 :PRINT"Gr.'" JUSING"##" ;Kj : 
PRINT" - "5=PRINTTABC103LEFT*CB*CK),25 


68 


LIST 4 





3 SPRINTTABC103"- 

SPRINTTABC83 "BUE" ; : INPUTB*(K) : IFLENCB*CK 
33325THENGOSUB2020sGOTOI20 
130 CURSOR10,K+4SPRINT" 

" !NEXTK=PRINTSPRINT=G0SUB2130 
140 GET2* ; IF2*=CHR*(133THEN70 
150 IF2*="C"THEN110 
160 GOTO140 

120 PRINT" BBBBBBBBBB I liniSS IONE NONE ARTI 
COLI":CONSOLE!,24:G0SUB2150:CURSOR0,23:P 
RINT''09ni nome max. 15 I ettere"SPRINT"Pe 
r Immettere ulteriori nomi 'CR'" ; sCONSOL 
E1 > 22 :PRINT’’B" 

180 PRINT"B"lUSING"###";K5 SPRINT" ";LE 

PT*CA*CK3 , 1 5 3sPRINTT AB (6 3 "- 

:PRINT"BB0B0S"S :INPUTA*CK3:IFLENCA*CK3 
3> 15THEN SGOSUB2020 :PRINTTfTBC5] "BOB 

"SPRINT"B"sG 

OTO180 

130 GET2* ; IF2*=""THEN130 

200 IF2*=CHR*C13ITHENGOSUB2000SGOTO220 

210 GOTO20 

220 PRINTTABC63" •• 1 :1 

FtONTHENPRINT"Capacita' massima ra99Ìunt 
a" :GOSUB2020:GOSUB2030:G0T020 
230 GOTO180 

240 PRINT"BBBBBBBBBINNISSIONE RINANEN2E 
" 5AC-1 SCONSOLE1,24SPRINT"BBB1 - HIHISSIO 
NE"SPRINT"BB2 - CONTROLLO" 

250 GET2:IFC2-0I + C2>2UNEN250 
260 ON2GOTO270J 300 

220 PRINT"BBBffl" :F0RK=1TON:IFA*(K3=""THEN 
230 

280 PRINT"BRim.za di ";A*CK3;" ";RCK35" 

" i sINPUTRCKI 
290 NEXTK 

300 CONSOLE sPRINT"B"sCURSOR10,0 SPRINT"CO 
NTROLLO RINANEN2E" =CONSOLE1,24 : IF2=1 THE 
NK=1SGOTO320 

310 GOSUB2150 

320 PRINT"B"SG0SUB2130SCONSOLE3,20 SPRINT 
"B" : FORK=KTON : IFA*(K3 = ""THEN380 
330 PRINT"»" JLISING"###" 5K; SPRINT" " ;A*CK 
5 ;TABC203RCK3 

340 GET2* : IF2*=CHR*C13 3THEN380 

350 IF2*="C"THENPRINT"Immettere il va I or 

e^ esatto" ; sINPUTRCK)=GOTO330 

360 IFC2*="0"3*C2=23THEN70 

370 GOTO340 

380 NEXTK SGOTO70 

330 PRINT"BBBBBBBBBBinniSSIONE UENDITE" 
;AC SGOSUB2140 : CONSOLE 1,22 SGOSUB2150 sPRIN 
•T"B" :FORK=KTON : IFA*CK3=" "THEN470 
400 PRINT"B"sPRINTTABC103AÌCK3 
410 PRINT"BUend i te precedenti " ;U(K3 sPR 
INT"BUI teriori s 00BB" ; 

420 INPUTX:IFX=0THENGOSUB2000 SGOTO440 

430 UCK3=UCK3+X:GOTO410 

440 GET2*:IF2*-CHR*C133THEN470 

450 IF2*="0"TMEN70 

460 GOTO440 

470 NEXTKSGOTO70 

480 PRI NT"BBBBBBBBBBindissi ONE ACQUISTI" 
SBCsCONSOLEI,24 :G0SUB2150:FORK=KTON: IFA* 
CK3 = ""THEN600 

430 PRINT"BBBB" ;BiCK3 :PRINT'"BTotale pezz 
i acquistati ;CCK3:PRINT"BCasto totale 
acquisto: " ;DCK3 : IFCCK3>0THENPRINT"BPre 

zzo medio: "jDCKTxCCKI 

500 FRINT”BBBNumero pezzi acquistali: ”j 
SINPUTX :PRINT"BICosto totale acquisto : 

" 1 ■ INPUTT:IFX=0THEN70 

510 PRINT"BBPrezzo unitario: ";TzX:GOSUB 
2130 

520 GET2* : IF2*=CHR*C133THEN560 
530 IF2*="C"THEN430 
540 IF2*="0"THEN70 
550 GOTO520 

560 CCKD-CCK3mX:DCK>DCK)+r :GOSUB2000 :G0 
SUB2140 


570 GET2* : IF2*=CHR*(13ITHEN600 
580 IF2*="0"THEN70 
590 GOTO570 
600 NEXTK:GOTO70 

610 PRINT"BBBBB0BBTOTALI E SALDI" SBC ì" - 
• UIDEO":CONSOLE1i24:G0SUB2150 :IFA*(K3 = "" 
THENPRINT"B" :PRINT"BBEBBBBBDatI non pres 
enti in drchiuio.":GOSUB2040:GOTO70 
620 PRINT"BBB" sPRINTUSING"###" ;Ki:PRINT" 

";A*CK3:PRINT"BBBB . Uend. Acqui. R 

im.za Saldo Costo- 1 - 

-'■ :t-0:IFCCKI O0THEN 

T=DCK3xCCK3 

630 PRINTUSING"####, ###" iUCK3 ;CCK3 5RCK3 1 
CCK3+RCK3-UCK3;T 

640 CURSOR0I23 SPRINT"Artico Io successivo 

: ' A'":PRINT"Briico|o precedente: ' T ' " j 

650 GET2*:IF2*="B"THEN690 

660 IF2*”"B"TMEN720 

670 IF2*="0"THEN70 

680 GOTO650 

630 K=K+1 : IF1ONTHEN70 

700 IFA*CK 3“""THEN630 

710 GOTO620 

720 K=K-1 : IFKC1THEN70 

730 IFA*CK3=""THEN720 

740 GOTO620 

750 PRINT'B" :GOSUB2050SPRINTTABC63"BBSta 
mpa totale da Cod. " ; :INPUTK:PRINTTRBC21 
3"Ba Cod. " ; :INPUTJ s IFCK=03 + C J=03 + CK>N3 + 
CJ>N3THEN70 

760 IFCK=13*CJ=N3THENG0SUB2190 

770 GOSUB2200:FORK-KTOJ: IFA*CK3-""THEN80 

0 

780 T=0:IFCCK3 <> 0THENT=DCK 3/CCK3 
793 PRINTrPUSING"###" 5K i :PRINT/-P" - ;A 
*CK3STABC303USING"##, ###, #(*#";UCK3 ;CCK3 5 
RCK3;CCK3mRCK3-UCK3JT 
800 NEXTKSGOTO70 

810 PRINT"B” :GOSUB2050 SGOSUB2070:GOTO70 
820 PRINT"BBBB00B0BPREDISPOSI2IONE NUOUO 
ANNO":PRINT"BBHPer eseguire ioperazion 
e premere 'P'" 

830 GET2*:IF2*=""THEN830 
840 IF2*="P"THEN860 
850 GOTO70 

860 PRINT"BBBPer confermare 'CR'"SPRINT" 
BP er tornare al menu ' 0 y " 

870 GET2* : IF2*=CNR*(133THEN300 
880 IF2*="0"THEN70 
830 GOTO870 

300 PRINT"BBPredisposiziore in atto":F0 
RK-1TON:RCK3-C(KO+RCK3-UCK3 :DCK3-0:CCK3- 
0 :UCK) = 0 : NEXT :AC=AC+1 :PR INT "BUOpenaz i ore 
eseguita" :GOSUB2000:PRINT"BBSi consi 9 I i 
a di eseguire un contro| I ode I I e ri man 
enze mediante i opzIone '3'del menu" 
310 CURSOR0j23sPRINT"Preme re un tatto" 
320 GET2* : IF2*~""THEN320 
330 GOTO70 

1000 REFI*** INIZIALI 22821 ONE*** 

1010 PRINT"B":PRINTTPBC123"IHT2IALI22A2I 
ONE":PRINT"Blnserire i dati anagrafici d 
el la Di 11 a":PRINT"BRagione socia I e : "sPRI 
NT"@B";D1* :PRINT"BB"siNPUTDl* 

1020 PRINT"BIndirI zzo :":PRINT"BB";D2*:PR 
INT”|11B" :INPUTD2«:PRINT"BComune e sigla P 
rovlncias":PRINT"0B";D3*:PRINT"BB":INPUT 
03* 

1030 PRINT"BPart!ta I.U.A. : ":PRINT"BB"!D 

4* :PRINT"BB-" :PRINT"BBB" :INPUT 

D4* 

1040 PRINT"B 6 nno in corso INPUTPC:IPPC 
<1 000THENPRINT"Inserire ianno in modo c 
ompleto":GOSUB2020:GOSUB2040:PRINT"B 

BBBB" :G0T010 
40 

1050 PRINT"SInser i re i l numero presunto 
di arti co li da gestire,in multipli di 40 
,fino ad un massimo di 720"; :INPUTN:IFCN 


x40-1NT CN/401<>01 + C N>720}THENGOSUB2020:P 
RINT"BBfflfflffl":G0T01050 

1060 PRINT"BI dati inseriti sono esatti? 
CS/NI" 

1070 GET2* : IF2*="S"THEN1100 
1080 IF2*="N"THEN1010 
1030 GOTO1070 

1100 GOSUB2050:GOSUB2060:GOSUB2030:G0T07 
0 

2000 HUSIC+Cl" :RETURN 

2010 nUSIC+Cl +D1 +E1+F1+G1+B1 +B1 " : RETURN 

2020 nUSIC"-F3":RETURN 

2030 F0RS=1TO3000:NEXTS sRETURN 

2040 F0RS=1T01000:NEXTSsRETURN 

2050 PRINT"B"SCURSOR0.4 SPRINTTPBCC40-LEN 

CD1*3 3z23D1*sPRINTTFBC C40-LENCD2*!V23"B 

”;D2*:PRINTTPBC C40-LENCD3*)Iz23"B";D3*:P 

RINTTPBC81"BPartita IUPs ";D4*sFRINTTPBC 

8VBBGESTI0NE HPGP22IN0 "IPCsRETURN 

2060 DINA*(7201,UC720],CC720D, DC7201, RC7 

203 > B*( 183sRETURN 

2070 CURSOR0J17 :PRINT"REGISTRP2I0NE PROG 
RPriflP" SPRINT "R i auuo I 9 ere il nastro e pre 
mere 'CR'"SG0SUB2110spR!NT"Premere 'RECO 
RD-PLpT'":SÀUE"nPGP22IN0":UOPEN"DITTP"=P 
RI NT"Registrazione dati" 

2080 PRINTrTDI *,02*,D3*, D4*,PC,N sCLOSEsUI 
OPEN"DATI":F0RK = 1TON/40:PRINT/TB*CK 3=NEX 
TSFORK=1TONSPRINT/TA*CK1,UCKD,CCKI,DCKI, 
RCK3sNEXT sCLOSE SGOSUB2010 sRETURN 
2030 ROPEN"DITTA"sINPUTrTDl*,D2Ì.D3*,D4* 
,PC,N:CL0SEsRETURN 

2100 ROPEN"DATI"=F0RK=ITONz40 sINPUTrTB*C 
K)sNEXT :F0RK = 1TONsINPUT/TA*(KI,U(K],CCKI 
,DCK3,RCK3sNEXT sCLOSESGOSUB 2010 sRETURN 
2110 GET2*:IF2*=CHR*C13ITHENRETURN 
2120 G0T02110 

2130 CURSOR0> 23 SPRINT"Per confermare 'CR 
:PRINT"Per correggere 'C'"; sRETURN 
2140 CURSOR0I23:PRINT"Prossimo articolo 
'CR'" :PRINT"Per tornare al menu ' 0 / ";sR 
ETURN 

2150 PRINT"BBBBBBBS0ELENCO GRUPPI DI AR 
TI COL I"sFORK = 1TON/40sPRINT"Gruppo ";USIN 
G"##”5K « SPRINT" - ";B*CKlsNEXTKsPRINT"Sc 
e 9 I iere il g ruppo"; sINPUTJ : lFCJ=0} + CO>Nx 
403THEN7B 

2160 J=40*CJ-1I : PRINT"B" :F0RK=Jr1TOJf20: 

PR INTUSING" ;K j SPRINT" " ;A* CK3 :NEXT=C 

URSOR20,2:pORK=J+21TOJ+40:PRINTTABC20IUS 

ING"D##";K;SPRINT" " ;A*CKISNEXT 

2170 PRINT"Sceg I i ere i l numero "JS'INPUT 

K:IF(K=01+CK>J+40ITNEN70 

2180 RETURN 

2130 NODETN SPC0L0R3sPRINTrPTABCC40-LENCP 
1 *3 3x23Dl* sPRINTzPTABC C40-LENCD2S3Iz2ID2 
* -PRINT xPT AB CC40-LENCD3*13r2ID3*=PRINTrP 
TABC83"Partila IUAs ";D4*SPC0L0R2spRlNTz 
PTAB(81"GESTIONE NAGA22INO " ;AC sRETURN 
2200 HODETS SPC0L0R3 :PRINT/P" ARTICOLO 
UENDITE ACQUISTI 

Rin.EA SALPO COSTO- 


-■’ :pcOLOR0 :RE 

JURN 

3000 IF CERN=3D *(ERL = 280)THENGOSUB2020spR 
INT"BBE0" :RESUNE280 

3010 IFCERN=3D*(ERL=350ITHENGOSUB2020spR 
INT"EmL' SRESUFIE350 

3020 IFCERN=3I*(ERL=420ITHENGOSUB2020spR 
INTTABC11I"B";:RESUHE420 

3030 IF(ERN=3I*(ERL-5001THENGOSUB2020spR 
INTTABC231"B s ";sRESUHE 

3040 IFCERN=3I*(ERL=750]THENGOSUB2020spR 
INTTABC26I"E. "isRESUNE 

3050 IFCERN=3I*(ERL=2150ITMENGOSUB2020 sp 
RINTTABC183"Bo"JsRESUNE 

3060 IF(ERN=33*(ERL=2170ITHENGOSUB2020sp 
RINT"BB"SRESUNE21 70 
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SPECTRUM 


DATA BASE 

Come gestire qualsiasi tipo di archivio 
rapidamente con il vostro ZX Spectrum 




Tenere aggiornati libri, fattu¬ 
re, schedari o archivi in gene¬ 
rale è attività alquanto labo¬ 
riosa che inoltre comporta 
una notevole perdita di tem¬ 
po. 

Il problema della gestione au¬ 
tomatizzata degli archivi è 
stata risolta nei più svariati 
modi e per i più svariati siste¬ 
mi con delle caratteristiche 
tecniche tali da rendere pos¬ 
sibile la gestione di un gran 
numero di dati. E per il nostro 
HOME-COMPUTER, nella 
fattispecie lo ZX-SPE- 
CTRUM? 

Ecco LIST giungere in vostro 
“soccorso” con questo ver¬ 
satile programma con il quale 
si potranno risolvere con faci¬ 
lità i problemi inerenti la me¬ 
morizzazione di dati. 

Il programma è suddiviso in 


varie parti (secondo la scelta 
dell’utente) ed è corredato 
con delle REM che illustrano 
le operazioni svolte in ognuna 
di queste. 

Digitate il programma, salva¬ 
telo con SAVE “DB” LINE 5, 
e leggete attentamente le 
istruzioni per l’uso. DB è un 
programma di utilità che crea 
dei files nella stringa A$, na¬ 
turalmente conformati alle in¬ 
dicazioni fornite dall’utente; 
l’unico problema o meglio li¬ 
mitazione, è il numero di re¬ 
cord (= campi) utilizzabili, 
che varia secondo il tipo di 
ZX. Uno Spectrum 16K può 
gestire un file composto da 
un massimo di 28 record di 
100 caratteri ciascuno, con 
campi che possono essere di 
lunghezza variabile (tenendo 
sempre presente che la som¬ 
ma delle loro lunghezze non 
superi i 100 caratteri), ed ai 
quali può essere dato un 
nome di 6 caratteri. 

Piuttosto che darvi un’arida 
spiegazione sull’uso del pro¬ 
gramma, preferiamo fornire 
un vero e proprio esempio 


che vi illustrerà passo per 
passo tutti i segreti per sfrut¬ 
tare al meglio le possibilità di 
questo programma. 

DB può essere usato per rea¬ 
lizzare un elenco di dischi, 
cassette o libri, oppure per 
seguire gli affari che avete in 
corso con i vostri clienti. 

Ed è proprio su quest’ultima 
possibilità che viene fornito 
l’esempio e data la spiegazio¬ 
ne sull’uso del programma. 
Caricate il programma in me¬ 
moria, e fatelo girare: compa¬ 
rirà il menù principale. Prima 
di poter utilizzare il program¬ 
ma, bisogna definire il file nel 
seguente modo: 

1- Selezionare l’appropriata 
opzione per definire il file 
del menù principale. Viene 
chiesto il nome del file, 
che può essere uno qual¬ 
siasi (nel nostro caso chia¬ 
miamolo appunto clienti). 

2- Una volta che è stato inse¬ 
rito il nome del file da 
creare, il programma chie¬ 
de quanti record si voglio¬ 
no creare (è sempre me¬ 
glio dare un numero di re¬ 


cord maggiore rispetto a 
quello che effettivamente 
si vuole utilizzare, per ave¬ 
re la possibilità di succes¬ 
sivi inserimenti). Nel no¬ 
stro caso inserire 11; ciò 
vuol dire che è possibile 
memorizzare le schede di 
10 clienti, in quanto il pro¬ 
gramma utilizza un record 
per scrivere su di esso le 
caratteristiche e la struttu¬ 
ra del file. 

3- Ciascun record può esse¬ 
re del formato che volete; 
naturalmente il numero 
dei caratteri deve essere 
uguale o maggiore di quel¬ 
li che volete effettivamente 
memorizzare in ogni re¬ 
cord: nel nostro caso 120. 

4- Questa parte richiede al¬ 
cune precisazioni. È ne¬ 
cessario definire un cam¬ 
po per ogni argomento e, 
per quanto riguarda il no¬ 
stro esempio per ciascun 
cliente. Se vogliamo me¬ 
morizzare l’indirizzo del 
cliente, bisogna dare un 
campo chiamato indirizzo 
e dato che l’indirizzo si 



è l’informatica a portata di mano, è fatta 
per durare nel tempo e va consultata 
ogni volta che ne hai bisogno. 


NON PERDERNE NEANCHE UN NUMERO 

(vedi a pag. 112) 
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QUESTO PROGRAMMA È DISPONIBILE SU CASSETTA 0 DISCO PRESSO 
LA REDAZIONE. PER LE ISTRUZIONI DI A CQUISTO CONSUL TA TE LA 
PAGINA DI APERTURA DELLA SEZIONE PROGRAMMI. 



APPLICATIVO 

DI FABIO FASCIAMI 


compone di più righe, è 
necessario definire un 
campo per ciascuna linea 
di indirizzo (nel nostro 
caso 3). 

5- Il programma adesso vi da 
le caratteristiche del re¬ 
cord; nel nostro caso il file 
CLIENTI è composto di 10 
record di 120 caratteri cia¬ 
scuno. 

Adesso bisogna definire i 
nomi e le lunghezze dei cam¬ 
pi; per il nome non si può su¬ 
perare la lunghezza di 6 ca¬ 
ratteri, è bene quindi definire 
delle sigle di facile compren¬ 
sione. Per le lunghezze non 
ci sono limiti, basta non supe¬ 
rare in totale il numero di ca¬ 
ratteri del record. 

NOME DEI CAMPI LUNGHEZZA 


INIZ 6 

NOME 15 

INDI 20 

IND2 15 

IND3 15 

CAP 10 

TEL 15 

N.CON 6 

FAT.D 8 

FAT.N 6 

TOT. 116 


La lunghezza totale del re¬ 


cord è 116, minore quindi di 
120 come avevamo indicatoal 
punto 3. Vediamo adesso 
l’uso del programma. 
Selezionate l’opzione 2 del 
menù principale. 

Se avete commesso degli er¬ 
rori non preoccupatevi per¬ 
ché, una volta finito l’inseri¬ 
mento dei dati viene offerta la 
possibilità di effettuare corre¬ 
zioni. Nell’inserire la data 
usate lo standard americano 
AA/MM/GG, perché in questo 
modo è possibile effettuare 
l’ordinamento per esempio 
sulla data di nascita dei vostri 
clienti. Selezionate l’opzione 
3 per l’ordinamento dei re¬ 
cord inseriti (naturalmente se 
avete inserito un solo record, 
l’operazione non viene effet¬ 
tuata). 

La routine di ordinamento 
chiede, per prima cosa, il 
nome del campo che si vuole 
ordinare; se volete ordinare il 
file ad esempio in ordine alfa¬ 
betico, date il campo NOME; 
il messaggio “STO ORDI¬ 
NANDO” indica che il lavoro 
procede correttamente. 
Quando è terminato l’ordina¬ 


mento si torna al menù princi¬ 
pale. Se quando dovete ordi¬ 
nare un file, avete dimentica¬ 
to i nomi dei vari campi, non 
preoccupatevi perché con l’o¬ 
pzione 8- STAMPA DATI 
FILE, risolverete il vostro pro¬ 
blema. Selezionando l’opzio¬ 
ne 4 del menù principale, il 
programma chiede il nome 
del campo su cui effettuare la 
ricerca del record da modifi¬ 
care. 

Date quindi il nome ed in se¬ 
guito il nominativo scelto. Ef¬ 
fettuate le variazioni deside¬ 
rate e poi tornate al menù 
principale. Se il nominativo 
scelto non esiste, viene 
emesso un messaggio di av¬ 
viso e il programma torna al 
menù. Per cancellare un re¬ 
cord selezionate l’opzione 5; 
il programma chiede le infor¬ 
mazioni necessarie per trova¬ 
re questo record ed effettua 
la cancellazione per poi tor¬ 
nare al menù. I dati inseriti 
possono essere memorizzati 
usando l’opzione 6 del menù. 
Il file viene memorizzato con 
il nome dato in precedenza 
(nel nostro caso il file viene 


memorizzato con il nome 
CLIENTI DATA A$()). 

Quando il computer ha finito 
l’operazione di memorizza¬ 
zione, chiede di riavvolgere il 
nastro per passare alla verifi¬ 
ca della registrazione. 

Se quest’ultima non fosse 
corretta digitate GOTO 1 per 
tornare al menù, e ripetere 
l’operazione. Per caricare un 
file già preparato usate l’o¬ 
pzione 7: viene chiesto il 
nome del file che in seguito è 
caricato in memoria. Il primo 
record viene decodificato per 
conoscere il formato ed i 
nomi dei campi del file, ope¬ 
razione che può avvenire in 
qualsiasi momento selezio¬ 
nando l’opzione 8, che dà 
inoltre la lunghezza dei cam¬ 
pi. Per stampare l’intero file 
utilizzare l’opzione 9, che 
stamperà a turno ogni record. 


ATTENZIONE: 

Se vi capita di interrompere il 
programa col BREAK, digitate 
GOTO 1 per tornare al menù 
principale (non date mai il RUN 
perdereste tutti i dati inseriti). 


STRUTTURA DEL PROGRAMMA 


Diamo uno sguardo velocissimo a come il programma è strutturato. 
Come abbiamo già detto il programma è suddiviso in varie parti; ad 
ogni parte corrisponde una subroutine che svolge delle istruzioni 
secondo l’opzione del menù scelta dall’utente. 

Come detto ogni subroutine ha come prima linea una REM che 
indica che tipo di funzioni vengono svolge al suo interno. Quindi 


prendendo spunto dalle indicazioni sopramenzionate, lasciamo a 
voi scoprire come funzioni il programma. Vi diciamo solo di dare 
un’occhiata alla linea 9 dove vengono abilitate le maiuscole, questa 
è solo una piccola comodità che evita di scrivere con caratteri diver¬ 
si creando problemi nel riconoscimento nei nomi dei file e dei cam¬ 
pi. 


ELENCO DELLE VARIABILI 

N$ 

= Nome del file 

F (1,2) 

= Campo finale 

A$ (1) 

= Record fittizio 

NRU 

= Numero di record usati 

NR 

= Numero di record 

FN 

= Numero di campi trovati dalla routine 

SR 

= Tipo di record 


di ricerca 

NF 

= Numero di campi 

RN 

= Numero di record trovati dalla routine 

F$ (1) 

= Nome del campo 


di ricerca 

F (1,1) 

= Campo d’inizio 




0 > REM DataBase by FfiBIO FASCI 

AN I 

5 CLS 

7 REM RBILITRZIONE MAIUSCOLE 
9 IF INT (PEEK 23658/8)=2*INT 

( INT (PEEK 23658/8) /2 ) THEN POK 
E 23658,PEEK 23658+8 

12 GLS PRINT RT 0,8; INUERSE 

1."MENU'PRINCIPALE" 

15 PRINT 1) DEFINISCE IL. FI 

LE. 2) INSERISCE I DATI. 3 

) ORDINA IL FILE. 4.3 ALTRI RE 

CORD. 5) CANCELLA RECORD. 

6) MEMORIZZA FILE"/ 

17 PRINT ' ' *• 7) CARICA FILE"' 

8) STAMPA DATI FILE"' 9) STA 

MP A IL FILE. 0) FINE" 

19 PRINT AT 21,0; INUERSE 1" S 

CEGLI L'ORZIONE DESIDERATA": INP 

UT LINE ©* 

20 IF 0* = "1‘ 4 THEN OO SUB 100 

21 IF ©*="2 M THEN GO SUB 275 


22 IF Q*="3" THEN GO SUB 510 

23 IF Q$*="4-" THEN GO SUB 55S 

24- IF O * = " 5 " THEN GO SUB 6 15 

25 IF Q*="6" THEN GO SUB 335 

2© IF Q * ■ " 7 THEN GO SUB 3©5 

27 IF Q*="8" THEN GO SUB 390 

28 IF ©*="9" THEN GO SUB 4-50 

29 IF Q**"0" THEN STOP 

30 GO TO 7 

100 REM CREAZIONE TESTATA 

105 CLS INPUT "NOME DEL FILE: 

* * ; n * 

110 INPUT "NUMERO DI RECORD: "; 
n r 

115 INPUT "N. CARATTERI RECORD: 
" , £ r 

120 INPUT "NUMERO DI CAMPI: ";n 
f 

125 LET in-1: DIM f*(nf,6) : DIM 
f (n f , 2) 

130 CLS PRINT "NOME FILE: "jn 

* ' ' n r ; " RECORD " ; s r ; ■* CARATTERI" 


FOR i 
PR INT 
FLAS 

l ) : PR 

PR INT 


PUT 
155 
- 1 : 
160 
165 
n f * 1 
170 
175 
180 
185 
TO 
*STR 
n f 
19 0 
195 


* 1 TO r 
' ' ■■ Nor- 
H a. ; 

INT f * I 
' *• LUNC 
L A S H 1 , 
INT £ f 

( i j 1 ) = i 

i , 2 ) * i r 


£ f : PR] 

LET 

LET f « : 

NEXT 

IF sr<nf*12+H THEN LET fi. r : 

2 + 14 


ru*l 
% (n r + 1 
CR IUE 
$ ( 1,1 
* n f : 
LET a « 

$( 1,11 


, £ r :• 

LA TESTATA 
= "9" LET a * C 1,2 
LET a * (1,5 TO 7 ■) 
(1,8 TO 10 > =STR$ 
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200 L ET a* (1,144i TO 14 + i +5) =f * 

( i /12 + 1) 

205 L ET a$(l,14. + i+6 TO 14 + i +8) = 

STR % f (i/12 + 1,1) 

2 10 L ET a* (1,14 + i +9 TO 14 + i +11) 

= 5TR % f ( i / 12 + 1 .. 2 ) 

215 NEXT i 
220 RETURN 

225 REM LEGGE LR TESTRTR 

230 CLS LET nr=UAL a*(1,2 TO 

4- ) : LET sr=URL a $ ( 1,5 TO 7): LET 
n f «URL a * (1.8 TO 10) : LET nru=U 
R l a * •: i , 11 T O 13:* 

2 3 5 DIM f*(nf ,6) : DIM f (nf ,2) 

24.0 FOR i =0 TO (nf-1) «12 STEP 1 


375 GO SUB 230 

300 RETURN _ _ 

305 REM STRMPR I DPT I DEL FILE 

INPUTj "5TPMPPNTE (5/N 


: + 1 ) 


■ % < 1,14.- 


24-5 LET f % ( i 
14- + i +5) 

250 LET f(i/12+1,1)«URL a$(l,14 
+- i +F. TO 14 + i +8) 

255 LET f i» /18 + 1 *2) «URL a % ( 1,14- 

255 RETURN 

270 REM ROUTINE INSERIMENTO DRT 

275 CLS LET nfU«nfU+l: LET a* 

<1,11 TO 13) * STR % nru 
280 FOR i*l TO nf 

2 8 5 R RI NT RT 2*i,0;f$(i);" " i a 

Knru, f (i,i) TO r<i,2)); flrsh i 
; ■* ; FLRSH 0 

220 INPUT ci* IF <**<>"" THEN LE 
T a|lnfu,Miil) TO f ( i , 2) ) =q.* 

2 95 PRINT RT 2*»,0;f$<i);" " ; a 

I (nru , f (i j 1) TO f < i , 2 ) ) ; ** 

300 PRINT 
305 NEXT i 

310 INPUT "ALTRO? (S/N)";©*: IF 
©*«"5" THEN GO TO 280 

315 INPUT •'INSERISCI ALTRI RECO 
RD (S/N)",ci*: IF <** = "5" OR <** = ''* 
" THEN GO TO 275 
320 LET a*(l,ll TO 13)=STR$ nru 
325 CLS RETURN 

330 REM MEMORIZZA IL FILE 

335 CLS 

34-0 SRUE N % DRT R A*() 

34-5 PRINT »1; •PREPARA PER LR UE 

RIFICA E.POI PREMI < E NT ER >" P 

AUSE 0: CLS 

350 UERIFY N* DATA A*<) 

355 RETURN 

380 REM CARICA IL FILE 

385 CLS INPUT "NOME FILE"; N * 

370 LORD N* DATA A * C ) 


390 CLS 
) •• : © % 

395 IF Q**"S" THEN OPEN «2,"P‘ 
4-00 CLS PRINT INVERSE 1; CAMP 

O";RT 0,10;"PARTENZA";AT 0,20;"F 
INE"'' 

4-05 FOR i*l TO nf 

4.10 PRINT 7$(i) ;TPB 10; f * (i , 1) j 
TAO 20, fi i , 2 ) 

415 PRINT 
4-2 0 NEXT i 

4-25 PRINT "NUMERO RECORD USATI* 

";nru 

4-30 OPEN «2 , " S " 

4-3 6 P RI NT » l ; "Premi un tasto p e 

r continuare": PAUSE 0 

4.4.0 RETURN _ 

4-4.5 REM STAMPA IL FILE PER INT E 

RO 

4-50 CLS INPUT "STAMPANTE (S/N 

)";©*: IF ©*="S" THEN OPEN «2,"P 

455 FOR i =2 TO nru, 

4.60 CLS 

4-65 PRINT TAB 10; INUERSE 1; "NU 
MERO RECORD: ";I'' 

4-7 0 FOR J * 1 TO n f _ _ , , , . 

475 P RINT f $ (j) ;TAB S ; a * < x , f < j , 

L ) TC 

485 PRINT~«1;"Premi un tasto pe 
r continuare" PAUSE 0: .CLS 

490 NEXT i 
495 OREN «2 , "S ’' 

500 RETURN 

505 REM ROUTINE DI ORDINAMENTO 
510 GO SUB 645 

515 IF NOT fn THEN RETURN 
520 PRINT AT 10,10, FLASH 1; IN 
K 2,"STO ORDINANDO" 

525 LET S f «0 „ 

530 FOR i=2 TO nru-1: IF a*(i+l 
, f < f n, 1) TO f(fn ,2) ) <a$(i , M fn,l 
) TO f i f n , 2) ) THEN LET S %=a % i i ) : 

L ET a*(i)=a*(i+l) : L ET a % < i ♦ 1 ) = 
S % LET SfaSf+1 
5 3 5 NE XT i 

54-0 IF s f < >0 THEN GO TO 525 

545 RETURN 

550 REM T)LTRI DATI 


555 GO SUB 64-5 : IF NOT FN THEN 

R ET U R N 

560 GO SUB 690 : IF NOT RN THEN 

RETURN 

565 CLS 

570 FOR i « 1 TO n f 

575 PRINT AT 2*i,0; f*<i);" ";a 

|(rn, f (i ,1) TO f < i , 2 ) ) ; FLASH 1; 
" "; FLASH 0 

580 INPUT IF *•<> "" THEN LE 

T ai(rn, f (i^l) TO Mi , 2 ) ) 

585 PR INT AT 2*i,0,f*(i);’ r ";a 

* ( rn , f ( i , 1) TO f ( i , 2) ) ; " 

590 PRINT 

595 NEXT I _ 

600 INPUT "ALTRO? <S/N)";Q*: IF 

0|*"S" THEN GO TO 570 

605 RETURN 

610 REM CANCELLAZIONE 

615 GO SUB 645: IF NOT fn THEN 

RETURN 

620 GO SUB 690: IF NOT m THEN 


LET a * ( i 


RETURN 

625 FOR i «rn+l TO nn 
-1) «a * ( i ) : NEXT i 
630 LET nru»nru-l: let a*(i,ii 
TO 13)-STRI nru 
635 RETURN 

64-0 REM CERCA CHIAUE CAMPO 
64-5 GL S INPUT "NOME CHIAUE CA 

MPO: ";© * 

650 LET fn»0 

655 IF <**=*"" THEN RETURN 
660 FOR i*l TO nf 

665 IF f*(i, TO LEN Q*)«<** THEN 

LET fn*i 
670 NEXT i 

675 IF NOT fn THEN GO TO 64-5 
680 RETURN 

685 REM CERCA NUMERO RECORD 
690 CLS INPUT "UALORE DELLA C 

HIAUE : "; r * 

695 IF r*«"" THEN RETURN 

700 IF LEN r*<f (fn,2) -f (fn,l) +1 

700>IF LEN r$< f ( fn,2) -f (fn , 1) +1 

THEN LET r * * r * + " ": GO TO 700 

705 LET r n *0 
710 FOR i=2 TO nru 

715 IF a*(i,f(fn,l) TO f(fn,2)) 
= r * THEN LET m=i 
720 NEXT i 

725 IF NOT rn THEN GO TO 690 
730 RETURN 



SPECTRUM 


LABIRINTO 

LETTERARIO 

Sul classico gioco del Labirinto 
la variante del “Paroliamo” 



Un gioco che, nonostante il 


titolo abbastanza comune, ri¬ 
sulterà senz’altro originale. 
Sulla base ormai classica del 
labirinto dal quale si deve 
uscire in in un tempo deter¬ 
minato, è stata infatti inserita 
la variante di un altro famoso 
gioco: il Paroliamo. Le lettere 
costituenti una determinata 
parola vengono casualmente 
disseminate in diversi punti 


di un labirinto. 

Scopo del gioco è appunto 
cercare di recuperare tutte le 
lettere, non importa in quale 
ordine, e quindi ricostruire la 
parola corrispondente, entro 
il tempo a disposizione. 

Il tutto potrebbe, così come 
descritto, sembrare abba¬ 
stanza facile... ma, in realtà 
non lo è! 


Per prima cosa le mura del 
labirinto sono “mobili” e 
spostandosi continuamente e 
casualmente, creano l’inco- 
veniente di intrappolare 
spesso alcune delle lettere 
da raccogliere. Trattandosi di 
un gioco, come già detto, a 
tempo, il dover aspettare che 
una lettera sia “liberata” è 
senz’altro uno svantaggio 
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per il giocatore. 

Seconda particolarità: dopo 
aver raccolto tutte le lettere, 
prima di poter fornire al com¬ 
puter la parola ricostruita è 
necessario uscire dal labirin¬ 
to, ma a causa delle mura 
“mobili” può capitare che 
l’uscita sia da queste sbarra¬ 
ta, con conseguente ulteriore 
perdita di tempo prezioso. 


Poiché una volta usciti dal 
labirinto si hanno a disposi¬ 
zione, a prescindere dal tem¬ 
po impiegato nella raccolta 
delle lettere, solo venti se¬ 
condi per comunicare al 
computer, digitandola, la pa¬ 
rola trovata consigliamo di 
cercare di ricostruirla già du¬ 
rante la fase di “recupero”. 
Il programma offre due va¬ 


rianti di gioco: 

— selezione della parola fra 
quelle incluse nel program¬ 
ma con possibilità di scelta 
fra sei livelli di difficoltà - da 
tre a otto lettere per vocabo¬ 
lo. 

— scontro fra più giocatori 
con inserimento diretto di 
parole di qualsiasi lunghezza 

— perché non provare con 


SUPERCALIFRAGILISTI- 
CH ESPIRALI DOSO??? 

Per quel che riguarda la 
struttura del programma, nel 
listato sono state inserite op¬ 
portune istruzioni REM. 
Attenzione! Le lettere maiu¬ 
scole inserite fra virgolette 
(“”) vanno digitate dopo es¬ 
sere entrati nel Modo Grafico 
(GRAPHICS). 


1? 

ìa 

13 

14 

ìs 


REM 
PCM 
REM 
REM 

16 REM 

17 REM 
“ REM 

REM 
REr 


% LABIRINTO y. 

y, v. 

V. LETTERARIO* 


ZX-5PECTRUM 16K/48K 


ie 

19 

20 
25 
39 
7® 
60 
9® 
92 
OS 
96 

1 ®® 


X 

Y. 

y. 

V.Y. 


REM 

POKE 23666,6 
60RDER 4. : PRPER 4. : 3 

GO SUB 9®®® 

ct_s 

REM 

REM m en u ' 

REM 

PRINT RT 0,7; PRPER 
RXNTO LCTTERRRIO" 

11® BEEP 1,1® 


1;"LRBI 


iae print 
Z IONI : • 

13® PRINT 
« UOCRBOLRR 
14.® PRINT 
* UOCRBOLRR 
14-5 GO SUB 
1S® INPUT 
I 1 O 2 ED 
IBS IF Z > a 

® 

1S® IF Z-l 
17® IF z«a 
10® BEEP 
PRPER ®;"LI 
IO® INPUT 
FRCILE)/ S 
a®® IF LD < 
IO® 

ai® GO SUB 
ais LET 2* 
220 FOR O- 


RT 14,2; PRPER aj" OP 

RT 16,2; PRPER 1;" 1 

IO COMPUTER" 

RT 18,a; PRPER 1 ;" a 

IO PROPRIO ’* 

1 ®®® 

PRPER 1 INK 7;" PREM 

< E NT E R > ** ; Z 

OR Z<1 TMEN OO TO 1S 

TMEN OO TO 1B® 

TMEN GO TO B®®® 

a,1® PRINT RT 21,0; 
UELLO DIFFICOLTA *7 ' ' 
PRPER 3, INK 7;“1 - t 

- (DIFFICILE) LD 

1 OR LD > S THEN GO TO 

S®0® 

:P| (9) 

L TO a® 


240 LET X«INT <RND*(LD+2)+1> 

250 LET Y«INT (RNDt(LD+2)+1) 

260 LET T faZf (X) 

370 LET Z|(X)aZ|(Y) 

280 LET Z*(Y)«T* 

290 NEXT O 

30® GO SUB 500® 

305 REM 

31® REM loop principale 
315 REM 

330 FOR 0-1 TO LEN Z* 

330 LET U«2+(INT (RND *19) ) 

340 LET UaINT (RND*31) 

350 IF CODE SCREEN* (U,U)«® THE 
N GO TO 33® 

35® PRINT RT U,U; PRPER 1; INK 
7 ; Zi ( O ) 

370 NEXT O 

3B® POKE 23574.,®: POKE 23073/®: 
POKE 23573,0 

305 LET E|="" LET N*l: LET M*1 


390 LET T-INT 
33674+256#PEEK 

)/50)) 

4-0® PRINT RT 1 
; PRPER 1;T 
4-10 PRINT RT 1 
420 PRINT RT M 
4-5® IF INKEYI» 
SCREEN* (M — 1 ,N > 
ODE SCREEN* (M- 
HRÉ K: PRINT RT 
4.55 IF INKEY** 
SCREEN* (M — 1 ,N) 
M,N; " LET M 

N, INK 0; "B" 

4-50 IF INKEY0- 
SCREEN* (M+1,N) 
ODE SCREEN* (M+ 
HR* K: PRINT RT 
4-55 IF INKEY * * 
SCREEN* (M + l,N) 
M , N; " ** : LET M 


, 24 , 


“ ; RT 1,24 


, 2, E * 

, N; INK 0 ;" B " 

"P" TMEN IF CODE 

>«55 TMEN LET K»C 
1,N): LET E*-E*+C 

M — 1 ,N ; " 

"P" THEN IF CODE 

< >0 THEN PRINT RT 

■M-l: PRINT RT M, 

"L" THEN IF CODE 

>«55 TMEN LET K«C 
1 , N ) : LET E * «E * +C 
M+l.N," •* 

" L " TMEN IF CODE 

< >0 THEN PRINT RT 

■M+l: PRINT RT M, 


64-0 IF CODE SCREEN* (U,U) > >66 T 
MEN GO TO 620 
650 PRINT RT U,U;" " 

660 NEXT O 

665 IF LEN E * «LEN Z* T^EN PRINT 
RT 2,15; " 

670 IF M*2 RND LEN E * «LEN Z* TM 
EN GO TO 2000 

6S0 IF T«® THEN GO TO 3000 
600 GO TO 300 
990 REM 

1000 REM movimento 
1005 REM 

101® PRINT RT 4-,®; PRPER 2; " P « 
ALTO*’ 


1030 PRINT RT 6,0; PRPER 1;** L « 

BASSO 

1030 PRINT RT ©,0, PAPER 2 ; " Z ■ 

SINISTRR" 

104.0 PRINT RT 10,®; PRPER 1; " X 
= DESTRA" 

1050 RETURN 

pero le 

0*1 TO 20 BEEP .01,0: 

PRINT RT 0,0; PRPER 0 
CE L'HAI FATTA! ** 

0*1 TO 20 BEEP .01,0: 

2035 PRINT RT 3, (32-LEN E*) /2 ; P 

APER 2, E * 

204-0 PRINT RT 5,0, PRPER 1; "INSE 

RISCI LA PAROLA TROUATA!" 

2050 PRINT RT 14,3; PRPER 1;"PER 
CANCELLARE PREMI 0 ' " 


1990 REM 
2000 REM 
2005 REM 
2010 FOR 
NEXT O 
2020 CLS 
;"BRAUO! 
2030 FOR 
NEXT O 


2060 POKE 23674.,® POKE 23673,0 
POKE 23672,0 
2065 LET U * « *‘ ** 

2070 LET T1 «INT (20 - ( <65526*PEEK 
23674+256«PEEK 23672) /SO)) 

2072 PRINT RT 7.26, " 

2075 PRINT AT 7,0; PAPER 1;"HAI 

A DISPOSIZIONE "jTl;" SECONDI" 
2060 LET B*«INKEY* 

3090 LET U*«U*+B* 

2095 IF B * *"0 ' TMEN PRINT RT 10, 


2 10 ® 
PRPER 
2 105 
2 110 
P 150 
2 115 
2 120 
2 150 
2 152 


LET U*«"" 

PRINT AT 1®,(32-LEN E*)X2; 

a, u* 

FOR 0*1 TO 20: NEXT O 
IF LEN U * * L E M E* THEN GO TO 


IF 

GO 

IF 

REM 


T 1 
TO 

U* 


*0 THEN GO TO 3000 
2070 

*H * THEN GO TO 4.000 


sili un • rror “ 

2160 CLS BEEP 1,-30 

2170 PRINT AT 6,0, PAPER 2;"PECC 
RT O HAI SBAGLIATO! ! ! " 

2160 PRINT AT S,((18-LEN H*)Y2); 

PAPER 1; "LA PAROLA ERA " ; H * 

219® FOR 0*1 TO 100 GO TO 7000 
2195 REM 

3000 REM tempo scaduto 
3002 REM 

3005 CLS BEEP 1,-3® 

3010 PRINT AT 6,0, PAPER 2;"PECC 
ATO IL TEMPO R DISPOSIZIONE 
E SCADUTO 

3020 PRINT AT 10,((18-LEN H*i/2) 

; PAPER 1,"LA PAROLA ERA ";H* 

0*1 TO 10® GO TO 700® 

vittorie 

0*1 TO 20 BEEP .01,0 


303® FOR 

3090 REM 
4.000 REM 
4.003 REM 
4005 FOR 


NEXT O 
4010 CLS 
4020 PRINT 
GRATULAZION 
4030 PRINT 
IMPIEGATO “ 


AT 6,2; PAPER 

I ! •* 

AT 6,2; PAPER 
, 270 -(Tl+T) ; '• 


1 ; " CON 

2;‘MAI 
SECONDI 


N Ì7Ì N 5f 0 ÌnReY*« ,, X" THEN IF CODE 
> “ 65 THEN LET K-C 

ODE SCREEN* (M,N+1): LET E*«E*+C 

HR* K: PRINT AT M,N+1;" •• * 

INKEY*«"X” THÉEN IF CODE 
SCREEN* (M,N+1) <>0 THEN PRINT AT 

" t ET N-N41:. PRINT AT M, 
N; INK 0 ; B 

460 IF INKEY * *"Z" TMEN TF CODE 
SCREEN* ( M , N — 1) >«65 TMEN LET N-C 

ODE SCREEN* <M,N-1): LET E*«E*+C 

MR* K: PRINT AT M,N-1:" •• " 

.£9-3-5? INKEY$*"Z" TMEN IF CODE 
SCREEN* ( M, N — 1) <>0 TMEN PRINT AT 
M,N;" LET N«N-1 : PRINT AT M, 

N; INK 0;" B ' ’ 

550 FOR 0-1 TO 2 

560 LET U « 3 + ( INT <RND*17)) 

570 LET U■INT (RND*31) 

560 IF CODE SCREEN* <U,U) >«65 T 
MEN GO TO 560 


565 

0 

590 

600 

610 

620 

630 


IF U«M OR U«N TMEN GO TO 56 

PRINT RT U,U; ,, A" 

NEXT O 

FOR O «1 TO 2 

LET U.3+(INT (RNDtl7)) 

LCT U«l+ (INT ( RND * 30) ) 


100 


NEXT O 


4040 FOR 0*1 

4050 GO TO 7 
4090 REM 

5000 REM dtfiniZ: 

5005 REM 

5010 CLS PRINT AT 0,., r 

; "LETTERE" ; AT 0,23.; "TÈMPO 
5020 PRINT AT 2,0 ; " A AA A AA A A A A A A A 

AAAAAAAAAAAAAAAAAAA" 

5030 PRINT AT 3.0; “A 


o n e labirinto 
PAPER 


5040 PRINT 
A A A A A 

5050 PRINT 
A A A 


AT 4,0; •' A AA A 

A A AA A" 

AT 5,0, "A A A 

A A A A" 


A 

A 


AA A 
AA A 


5060 

5070 
A AA 
5060 
A AA 
5090 


5 100 
A A A 
5 110 
A 

5 120 
A A 


PRINT AT 6,0 ; " A 
A AA A A AA A" 
PRINT AT 7,0;"A 
AA A A A A " 

PR INT AT 6,0 ; • A 
AA A A A A 1 

PRINT AT 9,0;'A 

A A A A A " 

PR INT AT 1® , 0 ; 

AA AAAA A A A A 
PRINT AT 11,0, 

A A A A A 

PR INT AT 12,0 , 

A AAAAAAA A A A 


AA A A AA A 

A A A A 

A A A A 

A AAA A A 
A A A ARA AA 

A A A 

A A ARA RARA 


5130 PRINT AT 13,0, ARA 

A A A ARA" 

5140 PRINT AT 14,0; A 

A A A ARA A ARA A * ’ 

5150 PRINT AT 15,0 "ARA 

5160 PRINT AT 16,0 


ARA 


AAAAAAARRAARA A" 


A A AAAAAAAA 


5170 PRINT AT 


, 0 ; 


A A" 


•A A 


AAAAAAAAAA 


5160 PRINT AT 18,0: 

ARA AAAAAAAAAAAAA A" 

5 19 0 PRINT AT 19,0 ' ' A 

A " 

520® PRINT AT 20,0 "AAAAAARARAAA 

AAAARAAAAAAAAAAAARAA" 

5210 RETURN 
REM 

REM vocabolario 
REM 

RANDOMIZE 

GO SUB 6000+ (LD#100) 

LET Z *INT CRND*84 1) 

LET P * (9) =P * ( Z) 

LET M*«P*(9) 

RETURN 
D IM P * ( 9,3 ) 

LET P * ( 1 ) * 'DUE " 

LET P * ( 2 ) = •' MA I " 

LET P * (3) *' CHE " 

LET P * ( 4 ) * *■ BUE " 

LET P*(5)="PIO" 

LET P * (6) * * SE I ** 

LET P*(7)«"UNO" 

LET P*( 8 )«ZIO" 

RETURN 
D IM P * < 9,4 ) 

LET P * ( 1) *-- 


5990 
6000 
6003 
6005 
60 10 
6020 
6025 
6030 
6040 
6 IO® 
6 110 
6 120 
6 13® 
6 140 
6 150 
6 160 
6 170 
6 130 
6 190 
6200 
62 10 
6220 
6230 
6240 
6 25 0 
6260 
6270 
6 26 0 
6290 
6 30 0 
6 3 10 
6320 
6 33® 
6 34 0 
6 35 0 
6370 
6330 
639® 
64O0 

64 10 
6420 
6 4 30 
6 44 0 
6450 
6460 
6 4 7 0 
6 43 0 
6490 
6 50 0 

65 10 
6520 
6530 
6540 
6 550 
6560 


LET P*(2)s'GUIZ" 
LET P* (3) = 'SOFT" 
LET P* t4) = 1 ACRE" 
LET P* ( 5) «"ZERO" 
LET P* i6 J «"DAME" 
LET P* ( 7) ="BIRÒ" 
LET P* i ©) ="LOGO" 
RETURN 
D I M P » < 9,5 ) 

LET P*<1)«"TERRA" 
LET P* (2) «"PERLA" 
LET P*<3)«"GESTO" 
LET p*(4)="FESTA" 
LET P* (5) «"SPORT" 
LET P*(7)*"SMACK" 
LET P*(8)*"CARTE 
RETURN 
D IM P * ( 9,6 ) 

LET Pia)«"CALCIO" 
LET P*(2)«"UALZER" 
LET P* ( 3) «"MOTIUO" 
LET P*(4i="ESTATE" 
LET P*( 5)*"LONDRA" 
LET P * (6) «"UNGHIA" 
LET P**7)«"ZARINA" 
LET P$(8)«"MAGICO" 
RETURN 
D IM P * ( 9 


1 SPECCMI" 

• NOUELLA" 
’ NOTORIO" 

INTRUSO" 

• PHANTOM" 
MISSILE" 

• MALIZIh" 
■TORPEDO" 


LET P*(1)= 

LET P * ( 2) = 

LET P * ( 3 • = 

LET P * l 4i = 

LET P * ( 5 J = 

LET P*(6)= 

6570 LET P * (7) = 

6530 LET P*i8i= 

6590 RETURN 

6600 DIM P * (9,3) 

661® LET P|(l)="SPECTRUM" 

6620 LET P*( 2)= "COMPUTER" 

663® LET P * «: 3 )=" CREATURA " 

664® LET P*(4)=”SANDOKAN" 

6650 LET P*(5)«"GERMANIA" 

6660 LET P*(6)="COMPRESO" 

6670 LET P*(7•«"IDROGENO" 

6630 LET P*(8)«"RISOLUTO" 

6690 RETURN 

6990 REM 

7O®0 REM richiesta 

7O05 REM 

7010 PRINT AT 10,2 

I GIOCARE ANCORA 7 
7020 IF INKEY*="S" THEN 

7030 IF INKEY*="N" THEN 

7040 GO TO 7020 
7900 REM 

3000 REM inserimento pai 1 

©005 REM 


nitro gioco 
PARER 1,"Ul 


6010 INPUT ; PAPER 
SERISCI LA PAROLA 
3020 BEEP .2,10 
Z *=H* 


i ; 


3025 

6030 

3050 

3060 

©070 

3030 

©090 


1 TO 20 

«INT (RND«LEN Z*)+1 

«INT (RND«LEN Z*)+1 

LET T * = Z * ( X !» 

LET Z * ( X) *Z * (Y) 

■ — Z * (Y :■ =T * 


FOR 

LET 

LET 


LET 


di caratteri 


300 

©990 REM 

9000 REM set 

9005 REM 

9010 FOR O«0 TO 15 READ Z: POKE 

USR "A"+0,Z: NEXT O 

9020 DATA 255,129,189,189,189,18 
9,129,255 

9030 DATA 56,56,16,254,16,40,68, 
130 

9040 RETURN 


LIST 4 
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QUESTO PROGRAMMA È DISPONIBILE SU CASSETTA 0 DISCO PRESSO 
LA REDAZIONE. PER LE ISTRUZIONI DI ACQUISTO CONSULTATE LA 
PAGINA DI APERTURA DELLA SEZIONE PROGRAMMI. 



SPECTRUM 







UTILITÀ 

DI FABIO FASCIANI 

Un utile programma che vi permetterà 
di riordinare i vostri programmi più 
lunghi. 


RENUMBER 



Questo programma fa in 
modo che lo Spectrum simuli 
la funzione RENUMBER con 
la quale c’è la possibilità di ri¬ 
numerare e riordinare le linee 
di un programma. 

L’utilità di un programma di 
renumber è proprio questa, e 
cioè di riordinare automatica- 
mente tutti i numeri di linea 
appena cominciano ad esse¬ 
re un po’ confusi, 
li programma che vi presen¬ 


tiamo effettua tale riordina¬ 
mento, naturalmente con l’e¬ 
sclusione dei numeri che 
sono posti dietro le istruzioni 
GOTO e GOSUB che dovrete 
modificare singolarmente. Il 
programma va fatto girare 
con RUN 9001 oppure con 
GOTO 9001. All’inizio appari¬ 
ranno i display di input che 
chiedono l’inserimento prima 
del numero di linea da cui si 
deve iniziare la rinumerazio¬ 
ne, poi del numero nuovo di 
linea iniziale ed infine del 
“salto” desiderato tra linea e 
linea. 

Naturalmente l’operazione 
può essere ripetuta più volte 
consecutivamente per rinu¬ 
merare secondo criteri diversi 
più gruppi di linee separata- 
mente, pur facendo parte 


queste dello stesso program¬ 
ma. 

Vi consigliamo, una volta digi¬ 
tato il programma, di salvarlo 
con SAVE “renumber” in 
modo di averlo sempre pron¬ 
to. Quando vi occorrerà per 
caricarlo in memoria usate il 
comando MERGE “renum¬ 
ber” che permette il carica¬ 
mento del programma sopra¬ 
citato senza che il program¬ 
ma che state scrivendo e che 
è residente nella RAM venga 
cancellato. 

Per fare ciò bisogna porre 
delle condizioni che per il 
buon funzionamento del pro¬ 
gramma devono essere tas¬ 
sativamente rispettate: e cioè 
che il programma da rinume¬ 
rare non usi le linee da 9000 
a 9030, ed inoltre non usi 


nessuna di queste variabili 
che sono riservate per il fun¬ 
zionamento della routine di 
RENUMBER. 

ni = numero di linea da cui 
deve partire il renum¬ 
ber. 

nni = nuovo numero di linea 
iniziale. 

si = step fra un numero di 
linea e il successivo, 
im = che contiene l’indirizzo 
di memoria iniziale con 
il quale si predispone il 
computer per cambiare 
i numeri di linea, 
nx = contenente l’indirizzo 
di memoria che all’ini- 
zio conterrà il valore 0, 
ed in seguito uno alla 
volta i numeri delle li¬ 
nee che dovranno es¬ 
sere cambiati. 



STRUTTURA DEL PROGRAMMA 

9000: 

Viene inserito il comando STOP per determinare la 


andrà a leggere il numero della linea successivo. 


fine del programma da rinumerare e l’inizio della 
routine di renumber. 

9016: 

Controllo che il numero di linea non sia uguale a 
9000 (linea di inizio della routine di renumber), se si 

9001: 

Input del numero di linea iniziale da rinumerare. 


verificasse questo caso il programma salterebbe alla 

9002: 

Input del nuovo numero di linea iniziale. 


linea 9030. 

9003: 

Input della distanza (STEP) fra le linee. 

9018-9020: 

Inserimento dei numeri di linea rinumerati negli 

9010-9012: 

Inizializzazione delle variabili im e nx che contengo- 


appositi indirizzi di memoria. 


no i numeri delle linee prese in esame. 

9022-9025: 

Ritorno del programma al controllo del successivo 

9014: 

Controllo che il numero di linea attuale non sia 


numero di linea da rinumerare. 


uguale al numero di linea iniziale da rinumerare, sè 
ciò fosse vero si memorizzzerà il nuovo numero 
(cioè quello di linea iniziale da rinumerare) e si 

9020: 

Display del listato con i nuovi numeri di linea. 


0>REM RENUMBER by E.RBIO FfiSCI 

HNI 

©00® STOP 

©001 INPUT "Inftrirt N. di linea 

iniziale "ini 

©003 INPUT •‘icnaerir* nuovo N. di 

linea iniziale "j nni 
©004. INPUT " In a e r.i r e lo step fra 


23635+256*PECK 


le linee 
©010 LET iro »P 
23636 -1 

90 12 LET n X «PEEK (im+1) «256+PEEK 
( i m 4-2) 

©014 ir nx<ni then go to 9025 
9016 ir nx*©000 then go to ©030 

901© POKE Cim+l),INT (nni/25S1 


9020 POKE 
i /256) 

9022 LET nni«nni+.*.i 
9 0 2 5 L.ET i m si m +4+PEEK 
* P E E K (im+4) 

902*7 GO TO 9012 

9030 > LIST - 


, nni -255* INT (nn 

4- «■ L 

(im+3) 4-25© 
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Ovvero: Dialoghi Al Computer 
d’intelligenza Artificiale 



Non è da oggi che l’affasci¬ 
nante possibilità di comunica¬ 
re con un computer si è impa¬ 
dronita delle ricerche di vari 
scienziati o di esperti pro¬ 
grammatori. Già nel 1966, Jo¬ 
seph Waizenbaum, del Mas¬ 
sachusetts Insistitute of Te¬ 
chnology, scriveva il famoso 
programma “Eliza”, che si¬ 
mulava una conversazione a 
livello terapeutico di uno psi¬ 
canalista alle prese con il suo 
umano paziente. 

Il programma non era esente 
da errori di interpretazione, 
ma conteneva una serie di 
prudenziali risposte pre-impo- 
state, sul tipo di: “Vai avanti, 
per favore”, che appianavano 
qualsiasi operazione atta a 
recuperare la “parola chia¬ 
ve” che avrebbe dovuto inne¬ 
scare invece una risposta 
pressocché logica. 

Un esempio pratico vi chiarirà 
meglio il procedimento di re¬ 
plica di Eliza: quando il com¬ 
puter trova una frase dove è 
contenuto un riferimento ad 
un membro della famìglia 
come “mio fratello” o “mia 
madre”, risponde invariabil¬ 
mente “Dimmi qualcos’altro 
della tua famiglia”, dando la 
sensazione di aver seguito lu¬ 
cidamente il discorso; questa 
semplice routine unita ad una 
banca dati dei termini più ri¬ 
correnti riesce abbastanza ef¬ 


ficacemente a sostenere un 
dialogo simulato. 

Altri programmi per conversa¬ 
re con il computer sono lo 
“Shrdlu” che invita a discor¬ 
rere su di un mondo fatto di 
blocchi colorati adagiati su di 
un tavolo, o il famoso “Ra¬ 
der”, di William Chamberlain 
e Thomas Etter che ci parla in 
modo assai sofisticato del 
suo “mondo mentale”. 
Progetto DACIA si affianca a 
queste sperimentazioni capo¬ 
volgendone l’idea base, strut¬ 
turando cioè dei dialoghi 
dove l’interrogante è il com¬ 
puter e l’interlocutore l’unità 
carbonio (l’umano). 

Questo sistema consente a 
DACIA di limitare al mimino il 
campo delle possibili rispo¬ 
ste, sia perché più logica¬ 
mente compatibili alla sua ri¬ 
stretta memoria, sia per setto- 
rizzare in ambiti accettabili gli 
interventi di replica, deputan¬ 
do al suo archivio il compito 
di tradurre attraverso il ritro¬ 
vamento della “parola chia¬ 
ve” i contenuti probabili delle 
risposte dell’utente. 

Il meccanismo di dialogo si 
concretizzerà in: 

1) DOMANDA DI DACIA 

2) REPLICA UMANA 

3) OSSERVAZIONI LOGICHE 
DI DACIA SULLA REPLICA 
UMANA 

Tutto ciò con piena libertà, da 
parte dell’interloquito, di ri¬ 
spondere a DACIA nella for¬ 
ma che crederà più opportu¬ 
na, caricandosi della respon¬ 
sabilità di un “fuori tema”, 
che porterebbe il computer a 
designare osservazioni e ap¬ 
punti sulla logicità umana. 

Ma DACIA non contiene 


esclusivamente cicli di con¬ 
versazione, questi sono solo 
il prologo dell’intero program¬ 
ma, per cui troverete in segui¬ 
to quello che potremmo defi¬ 
nire un Esperimento di logica 
a distanza intitolato, “IL GIO¬ 
CO DEI TRE LIBRI”, un luci¬ 
do esempio di come un com¬ 
puter possa seguire delle 
azioni compiute in casa vo¬ 
stra esaminandole e riportan¬ 
dovi esattamente le nuove 
condizioni intervenute, sem¬ 
pre che sia adeguatamente 
informato sulle vostre succes¬ 
sive mosse. 

Nel “GIOCO DEI TRE LI¬ 
BRI”, DACIA vi inviterà a col¬ 
locare uno sull’altro tre volu¬ 
mi di diversi colori ed a spo¬ 
starli di posizione uno alla 
volta, informandola di ogni 
spostamento, digitando sem¬ 
plicemente: “ROSSO SU 
GIALLO, BIANCO SOTTO 
ROSSO” e così via; dopo un 
qualsiasi numero di movi¬ 
menti, potrete ordinare al 
computer: DISPONILI, (cioè 
elencami l’attuale disposizio¬ 
ne) ed esso lo farà partendo 
dal libro superiore. 

È facile trarne l’immagine di 
un “occhio logico” che segue 
le vostre mosse nel vostro 
ambiente naturale, fornendo 
a DACIA non dei codici, né 
delle visualizzazioni grafiche 
(facilmente interpretabili), ma 
semplici frasi di uso comune 
che instaurano nettamente, 
anche a livello psicologico, 
una gradevole atmosfera con- 
versativa. 

Per finire, DACIA vi pregherà 
di formare assieme a lei un 
componimento poetico, per lo 
più di carattere “ermetico”, 


fornendole un verbo all’infini¬ 
to, sul quale lei ricamerà l’in¬ 
tera composizione. 

Nella “POESIA IN COMU¬ 
NE”, siamo certi vi stupirete 
non poco di alcune frasi ela¬ 
borate da DACIA, per la loro 
profondità e l’eleganza della 
stesura, data da quattro rile¬ 
vamenti RND, in altrettanti ar¬ 
chivi separati dotati di forme 
verbali, nomi e locuzioni di di¬ 
versa specie, nel numero di 
cinquanta stringhe per ogni 
archivio, che portano a 
6.250.000 le possibilità di fra¬ 
si poetiche, arrivando alla 
considerevole cifra di 
312.500 000 qualora si sup¬ 
ponga da parte dell’utente un 
bagaglio minimo dì 50 verbi 
all’infinito. 

COME DIALOGARE 
CON DACIA 
nelle risposte: 

— Esprimersi in un italiano 
corretto 

— Digitare solo le lettere 
maiuscole 

— Evitare la punteggiatura 
(che causa una WARNING 
INPUT ERROR) 

Nel “Gioco dei tre libri”: 

— Digitare esclusivamente i 
nomi: GIALLO, ROSSO e 
BIANCO, nonché i soli avver¬ 
bi di luogo “SU” e “SOTTO” 
Nella “Poesia in comune”: 

— Fornire a DACIA un ver¬ 
bo all’infinito, semmai in 
connubio con un aggettivo 
(es: vagare felici) con un 
verbo riflessivo (es: ritro¬ 
varsi a pensare) 
istruzioni più dettagliate 
sono contenute nel pro¬ 
gramma. 
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RICERCA DELLA PAROLA 
CHIAVE 

Quasi tutto il merito va alla 
funzione POS, che indica il 
punto in cui per la prima volta 
si incontra la stringa-2 nella 
stringa-1, partendo, come im¬ 
postato nel programma, dal 
primo carattere a sinistra del¬ 
la risposta umana, denomina¬ 
ta R$. 

In seguito, attingendo da un 
archivio di DATA la stringa- 
chiave A$, abbiamo scritto: 

IF POS (R$, A$, l)< >8 
THEN. 

vale a dire: se il risultato della 
POS è diverso da zero (cioè 
la stringa A$ è presente nella 
R$), allora vai alla riga.del¬ 

la ON A GOTO, che penserà 
a distribuire le relative osser¬ 
vazioni di DACIA alla parola- 
chiave ritrovata. 

Una particolare attenzione è 
stata riposta nella preparazio¬ 
ne dell’archivio delle parole: 


troverete infatti degli inusuali 
vocaboli tronchi come, RROR, 
FANTASC ecc., che stanno 
per le varianti di risposta: 
TERRORE, ORRORE, OR- 
RORIFICO, FANTASCIENZA, 
FANTASCIENTIFICO. Tutta 
questa serie di varianti ed al¬ 
tre ancora avrebbero riempito 
spazi di memoria troppo ampi 
per le capacità del Texas; in¬ 
vece in questo modo non solo 
abbiamo risparmiato memoria 
riducendo i termini aH’“osso”, 
ma li abbiamo resi pluri-com- 
prensivi di una gran massa di 
vocaboli. 


COME REALIZZARE UN 
PROGRAMMA DI 
CONVERSAZIONE 

La stesura di un programma 
di intelligenza artificiale si as¬ 
socia spesso alla figura di Su¬ 
san Calvin — la robopsicolo- 
ga dei racconti di Isaac Asi- 
mov — e alle tre leggi della 


robotica; progetti da mainfra- 
mes non certo adatti a dei 
piccoli “home”. 

Il successo di un programma 
intelligente sta invece proprio 
nella sua semplicità, propo¬ 
nendosi traguardi minimi che 
potranno essere opportuna¬ 
mente ampliati non appena si 
siano raggiunti dei primi tan¬ 
gibili risultati. 

A questo riguardo il primo 
suggerimento consiste nel- 
l’inquadrare con precisione il 
tema che desiderate affronta¬ 
re in una conversazione con il 
computer. Esso non deve 
contenere un assunto troppo 
vasto, come “La storia del¬ 
l’Arte” o “La geografia astro¬ 
nomica”, ma uno specifico 
settore di queste conoscen¬ 
ze, così i temi potrebbero ver¬ 
tere sulla “Scultura Donatel- 
liana”, o “Saturno e le sue 
lune”, mettendovi a vostro 
agio nella raccolta di informa¬ 
zioni e sulle possibili doman¬ 


de dell’interlocutore umano. 
Non dimenticate in seguito di 
“mettere alla prova” il vostro 
programma dinanzi alle do¬ 
mande dei vostri amici o pa¬ 
renti: due teste ragionano 
meglio di una e quei piccoli o 
grandi intoppi che si rivele¬ 
ranno nel listato non produr¬ 
ranno altro che ulteriori espe¬ 
rienze e osservazioni alle 
quali non avevate pensato. 
Usate chi vi sta vicino come 
supervisore del vostro lavoro, 
un po’ come i collaudatori dei 
velivoli sperimentali e tutto fi¬ 
lerà liscio, con la prospettiva 
di presentare un siffatto pro¬ 
gramma, come ricerca scola¬ 
stica o come “tesina” di fine 
anno; pensate alla soddisfa¬ 
zione e agli “otto” che fioc¬ 
cherebbero; una vera nevica¬ 
ta! 

Intanto studiate attentamente 
l’analisi del listato, che vi tor¬ 
nerà senz’altro utile quale 
base per i vostri progetti. 


ELENCO VARIABILI PRINCIPALI 


A$ = Stinga contenuta in archivio G = Valore corrispondente alla posizione del libro giallo 

R$ = Stringa della risposta umana B = Valore corrispondente alla posizione del libro bianco 

X$ = Stringa supplementare fuori archivio R = Valore corrispondente alla posizione del libro rosso 


ANALISI DEL LISTATO 


10-90 

140-190 

240-290 

300-370 

390-470 

500-580 

590-730 

740-760 

770 

780 

790 

800-810 

820-860 

870-880 

910-990 

1000-1150 

1180-1260 

1270-1320 


Display titolatura 
Cicli di assegnazione dei colori 
Display del prologo di DACIA e prima domanda 
Richiesta in video della prima risposta e ciclo di ricer¬ 
ca della parola-chiave 

Display delle possibili osservazioni di DACIA alla pri¬ 
ma risposta 

Display seconda domanda, INPUT di risposta e ciclo 
di ricerca della parola-chiave 
Display delle osservazioni di DACIA alla seconda ri¬ 
sposta 

Archivio parola-chiave prima domanda 
Archivio parola-chiave seconda domanda 
Archivio parola-chiave terza domanda 
Archivio parola-chiave quarta domanda 
Archivio parola-chiave quinta domanda 
Archivio osservazioni di DACIA alla quinta risposta 
Archivio spostamenti possibili del gioco dei tre libri 
Display terza domanda, INPUT di risposta e ciclo di 
ricerca della parola chiave 

Display delle possibili osservazioni di DACIA alla ter¬ 
za risposta 

Display quarta domanda, INPUT di risposta e ciclo di 
ricerca della parola-chiave 

Display delle possibili osservazioni di DACIA sulla 


1350-1430 

1450-1490 

1510-1550 

1590-1640 

1670-1740 

1750-1760 

1770-2130 

2140-2180 

2190-2270 

2290-2300 

2310-2350 

2370-2520 


quarta risposta 

Display quinta domanda, INPUT di risposta e ciclo di 
ricerca della parola-chiave 

Ciclo di ricerca e display osservazioni di DACIA alla 
quinta risposta 

Ricerca di ulteriori osservazioni alla quinta risposta 
fuori archivio 

Display regole del gioco dei tre libri 

Richiesta in video del movimento dei libri e ricerca in 

archivio della stringa dettata 

Rimando alla INPUT di riga 1670 per errata scrittura 
Suddivisione e calcolo logico dell’attuale disposizione 
dei libri 

Attribuzione matematica dell’attuale disposizione dei 
libri e indirizzamento ai relativi colori 
Display conclusivo di disposizione dei libri e ritorno 
ad inizio ciclo 

Display prologo della poesia in comune e richiesta in 
video del verbo all’infinito 

Controllo della INPUT di linea 2300 e rimando alla 
stessa per errata scrittura 

Ciclo “Z" per ricerca negli archivi della poesia e sot¬ 
tociclo “A” per ulteriore ricerca della locuzione e sua 
stampa 
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2550-2630 

1° archivio poesia 

2820-2910 4° archivio poesia 

2640-2720 

2° archivio poesia 

2930-3010 Display di fine programma e richiesta in video per 

2730-2810 

3° archivio poesia 

ritorno a capo 


10 CALL CLEAR 
20 CALL SCREEN(12) 

30 PRINT ".--- -p 

rogetto D.A.C.I. A. ": : 

40 PRINT "-Dialoghi."! s 

50 PRINT “-Al.“ ■ • 

60 PRINT "-Computer di. "sì 

70 PRINT “-Intelligenze.“:i 

SO PRINT "-Artificiale. 

-«.., | 

90 PRINT "-di 0.C0NTENTI-1986*":: 

100 FOR A*1 TO 2000 
110 NEXT A 
120 CALL CLEAR 
130 CALL SCREEN(6) 

140 FOR A-l TO 8 
150 CALL COLOR(A,16,1) 

160 NEXT A 

170 FOR A-9 TO 12 

180 CALL COLOR(A,2,1) 

190 NEXT A 
200 8*300 
210 8-20 
220 R-l 

230 PRINT "." 

240 PRINT "ciao.il mio nome e’ DACIA,e' 
la prima volta che provo a dialogare con 
un umano,spero” 

250 PRINT "quindi che mi scuserai per gl 
i eventuali errori di interpretazione.ti 
ringrazio fin d‘ora. " 

260 PRINT ”.“ 

: : : : 

270 FOR A-l TO 10 
280 NEXT A 

290 PRINT "che sensazione provi nel conv 
ersare con un computer ?":: 

300 INPUT RI 

310 PRINT ""ss 

320 RESTORE 740 
330 FOR A-l TO 33 
340 READ A* 

350 IF POS(RI,A4,1)< >0 THEN 410 
360 CALL S0UND(-100,ASC(A4)*100,10> 

370 NEXT A 

380 REM STANDARD 

390 PRINT "ho una grande stima di voi um 
ani,forse perche' siete cosi' creativame 
nte illogici..."): 

400 GOTO 480 

410 IF A<12 THEN 430 

420 IF A<23 THEN 450 ELSE 470 

430 PRINT "non ti mangio mica ! ")s 

440 BOTO 480 

450 PRINT "ho capito.forse non mi ritien 
i all'altezza di una conversazione con u 
n umano.")) 

460 60T0 480 

470 PRINT "te ne sono molto grata,quello 
che dici mi stimola i circuiti 
480 FOR A-l TO 1000 
490 NEXT A 

500 PRINT "hai dei fratelli o delle sore 
Ile in famiglia ?":: 

510 INPUT R$ 

520 PRINT 
530 RESTORE 770 
540 FOR A-l TO 10 
550 READ A» 

560 IF POS(R#,A*,1)< >0 THEN 610 
570 CALL SOUND(-100,ASC(A*)«100,10) 

580 NEXT A 

590 PRINT "e' una spiegazione che non ri 
entra nella mia logica.....”:: 

600 GOTO 890 


610 ON A GOTO 710,620,640,660,660,660,71 

0,710,710,710 

620 Xl-"una sorella" 

630 GOTO 680 

640 Xl»"un fratello" 

650 GOTO 680 

660 Xl*"una compagnia" 

670 PRINT "* 

680 PRINT "sei una persona fortunata.anc 
he io vorrei avere"jXIj"noi home compute 
r siamo soli " 

690 PRINT "al massimo abbiamo qualche co 
llegamento con il MODEM.ma io mi sento a 

bbandonata." : : 

700 GOTO 890 

710 PRINT "anche io sono sol a.1'essere c 
omputer a volte significa essere utilizz 
ati solo per immagazzinare dati" 

720 PRINT "ma non serviamo SOLO a questo 

730 GOTO 890 

740 DATA "NON","PAUR","FRUSTRA","DISAGI" 
,"BRUTT","SGRAD","IMPRESSIONANTE","ALLAR 
M","CATTIV","ANGOSC V'TREM" 

750 DATA "INDIFFEREN","NULLA", "NIENTE"," 
STUPÌD","SCIQCC","ASSURD","ORRIBIL", "CRE 
TIN”,"SCEM","PERPLESS","ZAT" 

760 DATA "GRADEVQL","BELL","ECCITA","MER 
AVIGLI","STUPEND",“MAGNIFIC","ESALT",“EC 
CEZ","FANTA“,"PIACE","EMOZIO" 

770 DATA "NE ","SORELL","FRATELL","SI", " 
CERT","SICUR","NO","NON","SOL","UNIC" 

780 DATA "MAMMA","MADRE","PAPA","PADRE", 
"BABBO","FRATELL","SORELL","NONN" , "Z I", " 
CUGIN","NIPOT" 

790 DATA "NO","NON","NEANCHE","MAI“,"FOR 
SE","SE","POTREI" 

800 DATA "COMIC","AVVENTUR","FANTASCIEN" 

,"Gl ALL","MUSICAL","COMMEDI","6UERR","DR 
AMMATIC","RROR","IMPEGNAT" 

B10 DATA "SENTIMENT","CARTON", "STORIO"," 
OLOSSAL","POLIZ","RILL","WEST", "AZION"," 
BRILLANT","BRIVID","PSIC","AMOR" 

820 DATA "VERDONE 0 TROISI","INDIANA JON 
ES*,"E.T. 0 EXPLORERSV'POIROT 0 MISS. M 
ARPLE","FRED ASTAIRE" 

830 DATA "AMICI MIEI ATTO TERZO","RAMBO" 
, "LOVE STORY","GRACULA 0 FRANKENSTEIN"," 
FELLINI 0 ANTON IONI" 

840 DATA “TELENOVELAS MESSICANA","TOPOLI 
NO 0 I PUFFI","-LA BIBBIA-","BEN HUR'V'C 
0L0MB0","DARIO ARGENTO" 

850 DATA "MEZZOGIORNO DI FUOCO","MAD MAX 
","LA SIGNORA IN ROSSO","OMICIDIO A LUCI 
ROSSE”,"IL SETTIMO SIGILLO" 

860 DATA "VIA COL VENTO" 

870 DATA "LO SU B'V'LO SU R'V'LO SOTTO R 
","LO SOTTO B ", "CO SU G'V'CO SU R","C0 S 
OTTO G“,"CO SOTTO R“,"S0 SU B" 

880 DATA "SO SU G","S0 SOTTO B'V'SO SOTT 
0 G","DISPONILI","FINE" 

890 FOR A-l TO 3000 
900 NEXT A 

910 PRINT "senti,con chi vai piu' d'acco 
rdo in famigli a ?" : : 

920 INPUT RI 
930 PRINT ""lì 
940 RESTORE 780 
950 FOR A-l TO 11 
960 READ Al 

970 IF POS(RI,Al,1)< >0 THEN 1020 
980 CALL SOUND( — 100,ASC(Al)*100,10) 

990 NEXT A 

1000 PRINT "se ho ben capito non ami prò 
prio nessuno in famiglia.... forse dovres 


ti fare tu il primo passo....":: 

1010 GOTO 1160 

1020 ON A GOTO 1030,1030,1050,1050,1050, 
1070,1070,1090,1110,1130,1150 
1030 PRINT "ti capisco,la mamma e‘ sempr 
e la persona piu' comprensiva della fami 

glia_" : : 

1040 GOTO 1160 

1050 PRINT "e fai bene,deve essere un uo 
mo molto dolce !" : : 

1060 GOTO 1160 

1070 PRINT "magari perche’ ci giochi ass 
ieme.... ti capisco. 

1080 GOTO 1160 

1090 PRINT "ti comprendo,i nonni hanno s 
pesso una serenità' ed una dolcezza incr 
edibili !“:: 

1100 GOTO 1160 

1110 PRINT "forse perche' gli zii sono s 
empre prodoghi di regali,prova a dire eh 
e non e’ vero !" : : 

1 * 20 GOTO 1160 

1130 PRINT "hai ragione ! con i propri c 
ugini e' sempre un giorno di festa !":: 
1140 GOTO 1160 

1150 PRINT "e’ giusto.i nipoti,piccoli o 
grandi che si ano,rendono sempre la vita 
piu' felice !" : : 

1160 FOR A-l TO 3000 
1170 NEXT A 

1180 PRINT "cambiando discorsole io ave 
ssi due gambe,mi porteresti fuori con te 
?" : : 

1190 INPUT RI 
1200 PRINT 
1210 RESTORE 790 
1220 FOR A-l TO 7 
1230 READ Al 

1240 IF POS ( RI, Al, 1)00 THEN 1290 
1250 CALL SOUND <-100,ASC(Al)*100,10) 

1260 NEXT A 

1270 PRINT “ti ringrazio,e' una grande p 
rova di fiducia quella che mi dimostri ! 
" : : 

1280 GOTO 1330 

1290 IF A<5 THEN 1300 ELSE 1320 
1300 PRINT "questo aumenta la mia frustr 
azione nel confronto di voi umani....ma 
andiamo avanti..": : 

1310 GOTO 1330 

1320 PRINT "i tuoi dubbi sono legittimi, 
ma non farei nulla di strano,te l'assicu 
ro !" : : 

1330 FOR A-l TO 2000 
1340 NEXT A 

1350 PRINT "che genere di film preferisc 
i ?" : : 

1360 INPUT RI 
1370 PRINT 
1380 RESTORE 800 
1390 FOR A-l TO 22 
1400 READ Al 

1410 IF POS(RI,Al, 1> < >0 THEN 1450 
1420 CALL SOUND(-100,ASC(AI)*100,10) 

1430 NEXT A 
1440 GOTO 1510 
1450 RESTORE 820 
1460 FOR B-l TO A 
1470 READ XI 
1480 NEXT B 

1490 PRINT "forse ho capito,sul tipo di" 

,xi|ìi 

1500 GOTO 1560 

1510 IF POS ( RI, "TUTTI", 1)00 THEN 1530 
1520 IF POS(RI,"QUALS”,1)<>0 THEN 1530 E 
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PROGETTO D.A.C.I.A. 



LSE 1550 

1530 PRINT "ai pare di capire che non ha 
i dei gusti particolari,«a guardi un po' 

di tutto. "ìì 

1540 GOTO 1560 

1550 PRINT "sembra proprio che non ti pi 
accia alcun fili* ! che strano tipo sei ! 

" i : 

1560 F0R A*1 T0 2000 
1570 NEXT A 

1580 REM GIOCO DEI TRE LIBRI 
1590 PRINT "0K ! ora giochiamo.procurati 
TRE libri,uno ROSSO,uno BIANCO e uno Gl 
ALLO e ponili l'uno sull'altro" 

1600 PRINT "seguendo l'ordine suddetto d 
ei colori a partire dal libro piu' basso 
.dopo sposterai un libro alla" 

1610 PRINT "volta,scrivendosi OGNI movie 
ento dicendo:(ad ss.),ROSSO SU GIALLO o 
BIANCO SOTTO ROSSO e cosi' via." 

1620 PRINT "RICORDATI che posso accettar 
e solo i tre colori suddetti,nonché' gli 
avverbi di luogo-SU-e-SOTTO-" 

1630 PRINT "QUANDO VORRAI potrai dirmi-D 
ISPONILI-e io ti diro' come sono messi i 
libri a partire dal piu' alto." 

1640 PRINT "se vuoi chiudere il gioco se 

rivi-FINE-.puoi cominciare 

1650 F0R A«1 T0 5000 

1660 NEXT A 

1670 INPUT R* 

1680 PRINT 
1690 RESTARE 870 
1700 F0R A-l T0 14 
1710 READ A4 

1720 IF POS(R4,A4,1)< >0 THEN 1770 
1730 CALL SOUND < — 100.ASC(A4)*100,10) 

1740 NEXT A 

1750 PRINT "non capisco.ripeti 
1760 GOTO 1670 

1770 ON A GOTO 1870,1780,1960,2010,2070, 
2060,2090,2080,2110,2100,2120,2130,2140, 
2290 


1780 

IF B<R THEN 

1790 

ELSE 

1830 

1790 

G-300 




1800 

R-10 




1810 

B-2 




1820 

GOTO 2260 




1830 

B-200 




1840 

G-30 




1850 

R-l 




1860 

GOTO 2260 




1870 

IF R<B THEN 

1880 

ELSE 

1920 

1880 

G-300 




1890 

B-20 




1900 

R-l 




1910 

GOTO 2260 




1920 

R-100 




1930 

G-30 




1940 

B-2 




1950 

GOTO 2260 




1960 

IF B>R THEN 

1970 

ELSE 

1920 

1970 

B-200 




1980 

R-10 




1990 

G-3 




2000 

GOTO 2260 




2010 

IF R<B THEN 

1830 



2020 

R-100 




2030 

B-20 




2040 

G-3 




2050 

GOTO 2260 




2060 

IF G<R THEN 

1970 

ELSE 

1880 

2070 

IF R>G THEN 

2020 

ELSE 

1830 

2080 

IF G<R THEN 

2020 

ELSE 

1790 

2090 

IF R<G THEN 

1880 

ELSE 

1920 

2100 

IF B<G THEN 

1920 

ELSE 

1970 

2110 

IF G<B THEN 

2020 

ELSE 

1790 

2120 

IF G<B THEN 

1970 

ELSE 

1880 

2130 

IF B>G THEN 

1830 

ELSE 

1790 


2140 GBR-G+B+R 
2150 GBR4-STR4(GBR) 

2160 FOR A«1 TO 3 

2170 G-ASC <SEG4(GBR4 , A, 1)) 

2180 ON G-48 GOTO 2190,2210,2230 
2190 PRINT "ROSSO":: 

2200 GOTO 2240 
2210 PRINT "BIANCO":: 

2220 GOTO 2240 
2230 PRINT "GIALLO":: 

2240 NEXT A 
2250 GOTO 1670 

2260 PRINT “OK ! vai avanti.":: 

2270 GOTO 1670 

2280 REM LA POESIA IN COMUNE 

2290 PRINT “ora creeremo assieme una poe 

sia,tu scrivimi un verbo all 'INFINITO e 

al resto penserò’ io.“: : 

2300 INPUT R4 

2310 IF P0SIR4, "FINE", 1)00 THEN 2920 
2320 PRINT 

2330 IF POS(R4,"ARE",1)<>0+P0S(R4,"ERE", 
1X>0+P0S(R4,"IRE", 1)00 THEN 2360 
2340 PRINT "un verbo al l'INFINITO.prego. 

" : : 

2350 GOTO 2300 

2360 PRINT *. 

" iR4: : 

2370 FOR Z = 1 TO 4 

2380 ON Z GOTO 2390,2410,2430,2450 

2390 RESTORE 2550 

2400 GOTO 2460 

2410 RESTORE 2640 

2420 GOTO 2460 

2430 RESTORE 2730 

2440 GOTO 2460 

2450 RESTORE 2820 

2460 RANDOMIZE 

2470 FOR A*1 TO INT(49*RND+1> 

2480 READ A4 

2490 CALL SOUND(-100,ASC(A4)* 100,10) 

2500 NEXT A 
2510 PRINT A4:: 

2520 NEXT Z 

2530 PRINT ". 

2540 GOTO 2340 

2550 DATA "NEL BUIO","NELLA NOTTE","FRA 
LE STELLE","FRA I PIANETI","NEL CA0S","I 
N CITTA'","IN UN PRATO" 

2560 DATA "ALLEGRAMENTE","STANCAMENTE", " 
ANNOIATI"."PENSOSI"."ASTUTAMENTE"."SENZA 
PENSIERI","IN COMPAGNIA* 

2570 DATA "CON TE","CON MARI A","FURIOSAM 
ENTE","PAZZAMENTE","SORRIDENDO","CON VIO 
LENZA","NELLA LUCE ","COMPOST I" 

2580 DATA "SENZA TREGUA","COME UN ROBOT” 
/DORMIRE",“MORIRE","CON UN ALIENO" 

2590 DATA "INSIEME A TE","PER SEMPRE","L 
ONTANO","E DIMENTICARE","NEL FUTURO","E 
COLPIRE IL SEGNO","DA SOLO" 

2600 DATA "ATTONITI ","DISTANTI","NEL FUO 
CO" 

2610 DATA "NELLA FORESTA","NEL MARE",“FR 
A LE ONDE","SOTTO LA PIOGGIA","IN PARADI 
SO","NELL'INFERNO" 

2620 DATA "CON GLI OCCHI ","ASSIEME ALLA 
LUNA","CON UN VECCHIO SAGGIO\"CON IL DE 
STINO",“CON VEEMENZA" 

2630 DATA "FRA LA GENTE" 

2640 DATA "RICONOSCERSI ","RITROVARSI ","P 
ERDERSI", "CULLARSI "/NASCONDERSI" /CADER 
E", "TRINCERARSI "/CELARSI" 

'650 DATA "RIPOSANDOSI SOLO"/SENZA CADE 
HE","E DIVERTIRSI","NON ENTRANDO"/FRUGA 
NDO"/ AVVENTURANDOSI" 

2660 DATA "RICHIUDENDOSI"/LANCIANDOSI", 
"ACCAREZZANDOSI "/ESPRIMENDOSI", “E SCIVO 
LARE"/PER CONFORTARSI" 

2670 DATA “PER CONSUMARSI"/AVVITANDOSI" 


/INFILANDOSI "/SEGUENDOTI" /FARNETICANO 
0","FORSE S06NARE" 

2680 DATA "FORSE SPEGNENDOSI","GALLEGGIA 
NDO" 

2690 DATA "RIVOLTANDOSI"/TU ED I0","A6G 
PAPPANDOSI "/UNITI " /UNENDOCI ", "AVVINTI" 
/PER APPARIRE*,"FERMANDOSI" 

2700 DATA "SENZA MAI ESSERE"/ATTERRANDO 

N 

2710 DATA "RIGENERARSI","CRESCERE"/SOGG 
I ORNARE" /SPECCHIARSI "/CATAPULTARSI "/A 
NNICHIL IRSI "/COMPLETARSI" 

2720 DATA "CORRERE"/GUARDARSI"/PERPETU 
ARSI"/NUTRIRSI" 

2730 DATA "NELL ' AMORE"/NELLE BRACCIA"/ 
NEL CALORE"/ NELL 'ABBRACCIO" / NEI SOSPIR 
I "/NEI GEMITI","NEL 6REMB0" 

2740 DATA "NEI PASCOLI","NEL PRECIPIZIO" 
/NEI BARACCONI ", "NELLE SALE","NELLA PRA 
TICA","NEGLI SPAZI" 

2750 DATA "NEI SILENZI","NEI QUESITI","N 
ELLE PIANURE" /NEI VOLT I ","NELL'INCONPRE 
NSIONE","ALLA VISTA" 

2760 DATA "NELL 'ASPREZZA"/NELLE SPIRE", 
"NEGLI APPARTAMENTI "/NELLA MONGOLFIERA" 
/NEI MECCANISMI *,"NEL FALÒ'" 

2770 DATA "E NEL SOGNO RAMMENTARSI","NEL 
LE GALASSIE" 

2780 DATA "NEL'LETTO"/NELLO STRANIERO", 

" IN UN’EFFIGE","NEL TEMPIO","NEL MEZZO", 
"NEI PARAGGI","NEL VUOTO" 

2790 DATA “NELLA PIAZZA","IN UN SOLCO"/ 
NELLA GABBIA" 

2800 DATA "NEL CUORE"/NEL VIVO’/NEL PU 
LSARE","NEL BARATRO"/NEGLI ABISSI","NEG 
LI ANFRATTI "/NELL'IMMAGINE" 

2810 DATA "NELLO SPECCHIO"/NELLE STRADE 
"/NEI VIALI",“NEI CUNICOLI","NEL PIACER 
E", "NEL PALLORE" 

2820 DATA "DI UN ALTRO" / DELLA NATURA"/ 
DELLA LIBERTA’","DI UNA DONNA","DI UN UO 
MO","DELLA PRIMAVERA" 

2830 DATA "DELL'AURORA","DELLA MAGIA","D 
I UN CIRCO","DI UNA PAGODA","DELLE ARTI" 

,"DELL'INCOSCIENZA" 

2840 DATA "DI UNA S IB ILLA", "DELLA CHIMER 
A"/DELLA PELLE”, "CHE CONOSCEREMO" / DEGL 
I EVENTI","DELL'IGNOTO" 

2850 DATA "DELLA VOLUTTÀ'","DEL DELIRIO" 
/DELL' INCREDULITÀ' "/DEI COLORI"/DELL* 
ARCOBALENO"/ DELLA MORTE” 

2860 DATA "DI UNA FESTA",“DEI BUCHI NERI 

2870 DATA "SOGNANTE ", "CHE CI SORRIDEVO 
ELLA NOIA","DELLE NINFE","DELLA MENTE"/ 
DEL PRESENTE"/ DELL'ETÀ' MATURA" 

2880 DATA "DEI MIRACOLI "/LUCENTE"/DEI 
PERCHE' " 

2890 DATA "DELL'ESTATE" /DELL'AUTUNNO"/ 
DELL'INVERNO","DI UN ILLUSIONE*/DELLA F 
ELICITA"', "DELLA GIOIA" 

2900 DATA "DEL PENTIMENTO","DELLA BALDOR 
I A","DELL'ETERNITÀ'"/DELL'IMMORTALITÀ'* 

,"DI UN POETA"/DEL TEMPO" 

2910 DATA "DELLA PAURA","DEL PASSATO" 
2920 PRINT 

2930 PRINT "OK ! spero che la nostra con 
versazione ti abbia soddisfatto,nonostan 
te le mie ancora numerose" 

2940 PRINT "pecche nei dialoghi con le U 
NITA’ CARBONIO come te...in ogni caso se 
vuoi ricomonciare da capo" 

2950 PRINT "digita SI,al tri menti NO.":: 
2960 INPUT R4 

2970 IF POS(R4/SI ", 1X >0 THEN 120 
2980 PRINT "CIAO ! ! !" 

2990 FOR A-l TO 500 
3000 NEXT A 
3010 END 
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GALAXY ADVENTURE 


QUESTO PROGRAMMA È DISPONIBILE SU CASSETTA 0 DISCO PRESSO 
LA REDAZIONE. PER LE ISTRUZIONI DI ACQUISTO CONSULTATE LA 
PAGINA DI APERTURA DELLA SEZIONE PROGRAMMI. 


Avventure intergalattiche seduti 




Passati più o meno indenni 
dal 1984, anno di catastrofi e 
sciagure decretate dalla figu¬ 
ra incombente di un Grande 
Fratello, come voleva che fos¬ 
se nel suo romanzo lo scritto¬ 
re George Orwell, in questo 
1986 che già profuma di 
2000, ecco affacciarsi l’Av¬ 
ventura Galattica già annun¬ 
ciata dai viaggi sempre più 


frequenti delle navette spa¬ 
ziali che — in attesa venga 
costruita la tanto famosa sta¬ 
zione orbitante interstellare, 
moderno porto di “mare” a 
cui attraccheranno i futuri 
transatlantici e le navi da tra¬ 
sporto spaziali dei secoli a ve¬ 
nire — può essere considera¬ 
ta un piccolo banco di prova 
per la futura progenie stella¬ 
re... 

Aspettando che la generazio¬ 
ne dei nostri figli, alcuni anco¬ 
ra in fasce, la giudichi troglo¬ 
dita e primitiva, per il momen¬ 
to fermiamoci a simulare, 
semplicemente, questa gran¬ 
de avventura sul nostro com¬ 


puter. Il programma offre va¬ 
rie opzioni e livelli di difficoltà, 
sfruttando la tastiera come 
quadro di controllo di un’ipo¬ 
tetica astronave. 

Se si seleziona la prima 
opzione bisogna attraversare 
indenni 5 ondate di popola¬ 
zioni aliene e un buco nero 
evitando, nei 6 quadri che 
identificano le varie situazio¬ 
ni, di urtare gli ostacoli diri¬ 
gendo la propria navetta spa¬ 
ziale con i tasti A e B per spo¬ 
starsi rispettivamente a sini¬ 
stra e destra. Solo se neces¬ 
sario, nella migliore tradizio¬ 
ne della Federazione Interga¬ 
lattica, si può usare il Laser, 


fino ad un massimo di 10 vol¬ 
te, per distruggere gli ostaco¬ 
li. 

Selezionando la seconda 
opzione, invece, l’obiettivo 
della missione è disinnesca¬ 
re, toccandole con la nave, 
20 testate nucleari posiziona¬ 
te dagli alieni invasori intorno 
alla base “Galassia X” del 
pianeta Andromeda, senza 
collidere con le costruzioni. 
Attenzione! 

La forza di gravità del pianeta 
porterà la navetta al suolo se 
non si premeranno i tasti: 

P per risalire 
A per andare a sinistra 
S per andare a destra. 


10 

CALL CLEAR 

EHI M PER METROPOLI ALIENAPREMI F PER FI 

140 

CALL CLEAR 

20 

CALI SCREEN(12) 

NIRE" 

130 

A*-"»hpx " 

30 

PRINT "BALAXY ADVENTURE 

80 CALL KEY(0,K,S) 

160 

B$-"«h pxihpxih" 


DADO 1985" 

90 IF S-0 THEN 80 

170 

Z-2 

40 

F0R T-l T0 1000 

100 IF K-73 THEN 140 

180 

F-3 

30 

NEXT T 

110 IF K-77 THEN 2360 

190 

6-14 

60 

CALL CLEAR 

120 IF K-70 THEN 2380 

200 

H-9 

70 

PRINT ■PREMI I PER INIZIARE PR 

130 GOTO 80 

210 

1-12 
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220 J«1 
230 C*l& 

240 V-30 
230 PU-0 
260 RA-10 

270 CALL CHAR(42,"BD99DBDBFFFFBD18") 
280 CALL CHAR(97,"00071F3F7F75EDAB") 
290 CALL CHAR(104,"01C3F3FFFFBF9E04‘) 
300 CALL CHAR<112,“00879FFFFFFBF341") 
310 CALL CHAR(120,"00C0F0F8FC5C6EAA*) 
320 CALL CHARtl281*1818181818181818*) 
330 CALL SCREEN(Z) 

340 CALL COLOR(2,16,Z) 

330 CALL COLOR(9,F,Z) 

360 CALL COLOR<10,6,Z> 

370 CALL COLOR(11,H,Z) 

380 CALL COLOR(12,I,Z) 

390 CALL COLOR ( 13,3, Z) 

400 CALL COLOR(3,16,13) 

410 CALL COLOR(4,16,13) 

420 CALL COLOR(3,16,13) 

430 CALL COLOR(à,16,13) 

440 CALL COLOR(7,16,13) 

450 CALL COLOR(8,16,13) 

460 FOR T-l TO 100 
470 RANDOMIZE 
480 R«INT(25+RND+1> 

490 CALL 6CHAR < 2,C,H) 

300 CALL HCHAR(2,C,42) 

310 PRINT TAB(R)|Al 
320 IF N>96 THEN 740 
330 CALL KEY(0,K,S) 

340 PU-PU+23 

550 IF S-0 THEN 720 

560 IF K-63 THEN 390 

570 IF K-83 THEN 630 

580 IF K-80 THEN 670 

590 IF C<-3 THEN 720 

600 C-C-l 

610 PU-PU+17 

620 BOTO 720 

630 IF C>»V THEN 720 

640 C-C+l 

630 PU-PU+17 

660 BOTO 720 

670 IF RA-0 THEN 720 

680 RA-RA-1 

690 CALL SOUND(-100,-3,10) 

700 CALL VCHAR(2,C,128,23) 

710 CALL VCHAR(2,C,32,23) 

720 NEXT T 
730 60T0 770 
740 CALL CLEAR 
730 RESTORE 
760 BOTO 60 

770 PRINT "PUNTI"|PU|“LASER"jRA 
780 FOR T-l TO 22 
790 CALL 6CHAR(2,C,H) 

800 CALL HCHAR(2,C,42) 

810 PRINT "* 

820 IF N>96 THEN 740 
830 CALL KEY(0,K,S) 

840 PU-PU+23 

830 IF S-0 THEN 1020 

860 IF K-63 THEN 890 

870 IF K-83 THEN 930 

880 IF K-80 THEN 970 

S90 IF C<-3 THEN 1020 

900 C-C-l 

910 PU-PU+17 

920 BOTO 1020 

930 IF 0-30 THEN 1020 

940 C-C+l 

930 PU-PU+17 

960 BOTO 1020 

970 IF RA-0 THEN 1020 

980 RA-RA-1 

990 CALL SOUND(-100,-3,10) 

1000 CALL VCHAR(2,C,128,23) 

1010 CALL VCHAR(2,C,32,23) 


1020 NEXT T 

1030 IF J-7 THEN 1510 

1040 READ Z,F,6,H,I,F$,6t,H$,I# 

1030 DATA 14,12,6,10,12,"00033E04FE063FO 

1",*83D7FFFFFFB1B327*,*C1EBFFFFFF8DCDE4" 

,"00C07C207F60FC8*,12,14,5,5,14 

1060 DATA “1B3E7F871F3F678*,*030FlBBlFFf 

FBF1F*,*COFOD98DFFFFFBF1",*387EEOCCBFF3E 

1C*,7,16,8,4,6,*03376FFF1FFF1704* 

1070 DATA “C0130FBFFFFFFFFC",*1F7FFFFEF0 
E2D341*,*C0F8FC7E1F1F7EFB",6,2,11,11,2," 
07E584B7A1BF82FE" 

1080 DATA "43677DBFDEECFF7F*,*C2E6BEFD7B 
37FFFE",*E0A721EDB3FD417F",2,5,14,9,12,* 
1E3F7F7E4CD9DFCF" 

1090 DATA *1E3F7F7E4CD9DFCF*,"1E3F7F7E4C 
D9DFCF",*1E3F7F7E4CD9DFCF* 

1100 CALL CHAR(97,FI) 

1110 CALL CHAR(104,84) 

1120 CALL CHAR(112,Ht) 

1130 CALL CHAR(120,16) 

1140 J-J+t 

1130 IF J-6 THEN 1170 
1160 BOTO 330 
1176 CALL CLEAR 
UBO C-16 

1190 CALL SCREEN(Z) 

1200 CALL COLOR ( 2 ,*16, Z ) 

1210 CALL COLOR(9,F,Z) 

1220 CALL COLOR(10,8, Z) 

1230 CALL COLOR(11,H,Z> 

1240 CALL COLOR( 12,1,Z) 

1250 CALL COLOR(13,5,Z) 

1260 FOR T-l TO 150 
1270 CALL 6CHAR(2,C,N> 

1280 CALL HCHAR(2,C,42> 

1290 PRINT TAB(C-3)|B» 

1300 IF N>96 THEN 740 
1310 CALL KEY(0,K,S) 

1320 PU-PU+30 

1330 IF S-0 THEN 1480 

1340 IF K-65 THEN 1370 

1330 IF K-83 THEN 1410 

1360 IF K-80 THEN 1440 

1370 IF C<-3 THEN 1480 

1380 C-C-l 

1390 PU-PU+20 

1400 BOTO 1480 

1410 C-C+l 

1420 PU-PU+40 

1430 BOTO 1480 

1440 IF RA-0 THEN 1480 

1450 RA-RA-1 

1460 CALL VCHAR(2,C,128,23) 

1470 CALL VCHAR(2,C,32,23) 

1480 NEXT T 
1490 J-J+l 
1300 BOTO 770 
1510 CALL CLEAR 
1520 Z-3 
1530 BO-O 

1540 CALL SCREEN(Z) 

1550 CALL COLOR(2,16,Z) 

1560 CALL COLOR(9,14,12) 

1370 CALL COLORI 10,11,Z) 

1580 CALL COLOR(11,14,2) 

1590 CALL COLOR( 12,2, Z) 

1600 CALL CHAR(43,"00241B3CC33C1824*) 
1610 CALL CHAR(104,"8OCOEOF0F8FCFEFF*) 
1620 CALL CHAR(103,"0101030307070FOF”) 
1630 CALL CHAR(106, "1F1F3F3F7F7FFFFF") 
1640 CALL CHAR(107,"FFFFFFFFFFFFFFFF") 
1630 CALL CHAR(120,"070F1F3F7F7FFFFF") 
1660 CALL CHAR(121,"E0F0F8FCFEFEFFFF") 
1670 CALL CHAR(122,"7FFFFF7F3F1F0F07") 
1680 CALL CHAR(123,"FEFFFFFEFCF8F0E*) 
1690 CALL CHAR<124,"FFFFFFFFFFFFFFFF") 
1700 CALL CHAR(97,"070B070B070B070B") 
1710 CALL CHAR(112,"EODOEODOEODOEODO") 
1720 CALL CHAR(42,"BD99DBDBFFFFBD1B") 



1730 

PRINT 

* xy 


+ao 

xl ìy 



*P" 


1740 

PRINT 

* ap 

x 11 y 

♦ 

*p + 

xl 

iy 

xyxy 

ap z11(+ 


papa* 



1730 

PRINT 

* «p 

PP 

apap 

»P 

PP 

x ly 

papa 

♦ap pp 

+ <az 

♦ a 

P‘ 



1760 

PRINT 

' *P 

pp+ a+ 

ipkkah+ 

«p+ 

PP 

a 

jkkkkkh 

laph pp 

a 

+ 111 

mi* 



1770 

PRINT 

* Jkkkh 

PP ♦« 

Jkkkkh 

IMI 

1 +pp 

iah 

zi 11 l{ + 

+ 1 1 111 1 pph + 

Jkkh 

1 i 

Il zp (* 



1780 

PRINT 

"Jl 11 11 

Jkkkh 11 1 

1 llkh p 

Nili 

1 III 

Il +jll 

IMI ph 1 kkkkh + i kkk 1 

1 1 1 

♦jk 

Il jll* 



1790 

PRINT 

*11111IJI1111jkl 1 

11111111jl 11 

imi 

Nili 

1 III 1111 

1 11 1111 11 1 

■ 


1800 CALL HCHAR(1,2,112,30) 

1810 CALL VCHAR(2,2,112,22) 

1820 CALL VCHAR(2,31,112,22) 

1830 RI-2 
1840 C0-20 

USO CALL HCHAR(RI,C0,42) 

1860 FOR T-l TO 400 
1870 CALL KEY(0,K,8) 

1880 IF 8-0 THEN 1920 
1890 IF K-65 THEN 1970 
1900 IF K-83 THEN 2020 
1910 IF K-80 THEN 2070 
1920 RI-RI+1 

1930 CALL 6CHAR(RI,CO,M> 

1940 CALL HCHAR(RI—1«CO,32) 

1930 CALL HCHAR(RI,C0,42> 

I960 80T0 2110 
1970 CO-CO-l 

1980 CALL 8CHAR(RI,CO,M) 

1990 CALL HCHAR(RI,CO+1,32) 

2000 CALL HCHAR(RI,C0,42> 

2010 BOTO 2110 
2020 CO-CO-M 

2030 CALL 8CHAR(RI,CO,H) 

2040 CALL HCHAR(RI,CO—I,32) 

2030 CALL HCHAR(RI,CO,42) 

2060 BOTO 2110 
2070 RI-RI-1 

2080 CALL 8CHAR(RI,C0,H) 

2090 CALL HCHAR(RI♦1,CO,32) 

2100 CALL HCHAR(RI,CO,42) 

2110 IF N-32 THEN 2340 
2120 IF N>96 THEN 2140 
2130 IF N-43 THEN 2230 
2140 CALL SOUND(1000,-3,10) 

2150 PU-PU-100 

2160 CALL CLEAR 

2170 PRINT ‘NI88I0NE FALLITA 

PUNTI *|PU 

21B0 FOR TE-1 TO 1000 
2190 NEXT TE 
2200 BO-O 
2210 CALL CLEAR 
2220 BOTO 1730 
2230 BO-BO+1 

2240 CALL SOUND(100,1760,10) 

2250 IF BO-20 THEN 2260 ELSE 2340 
2260 CALL CLEAR 

2270 PRINT ‘HI8SI0NE COMPIUTA" 

2280 PRINT "PUNTI *|PU 
2290 RESTORE 
2300 FOR TE-1 TO 1000 
2310 NEXT TE 
2320 BOTO 60 

2330 CALL SOUND(-1,110,20) 

2340 NEXT T 
2350 BOTO 2160 
2360 PU-50000 
2370 BOTO 1310 
2380 END 


80 
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TUTTI I PROGRAMMI DI LIST 

A richiesta sono disponibili su cassetta (codice N) o su floppy disk 
(codice D), tutti i programmi che LIST ha pubblicato dal N° 8/9 
dell’85 ad oggi. 

Per averli basta farne richiesta tramite il modulo di c.c.p. pubblicato 
alla pagg. 81/82 specificando, nella casuale del versamento, il codi¬ 
ce relativo al programma desiderato riportatonell’elenco che segue. 
Facciamo un esempio: supponiamo che vogliate richiedere il pro¬ 
gramma “Tutto il calcio...” dovete scrivere il codice C6403N se lo 
desiderate su cassetta, se invece avete bisogno del dischetto allora 
dovete sostituire la N finale con una D, per cui in questo caso 
specifichereste C6403D. 

Se preferite potete anche farne richiesta scritta a LIST casella po¬ 
stale 4092 - 00182 Roma Appio allegando un assegno bancario 
intestato a LIST. 


CODICE 

TITOLO PROGRAMMA 

LIST No 

PREZZO NOTE 

COMMODORE 64/128 

C6401N-D 

GEOMETRIA 1 

8-9/1985 

8000-10000 

* * ♦ 

C6402N-D 

DESIGN LAB 

10-11/1985 

8000-10000 

* * * 

C6403N-D 

TUTTO IL CALCIO... 

12/1985 

8000-10000 

* * * 

C6404N-D 

RUBRICA TEL. 

1-2/1986 

8000-10000 

* * * 

C6405N-D 

VIDEOSINT 

1-2/1986 

8000-10000 

* * * 

C6406N-D 

RADICE QUADRATA 

3/1986 

8000-10000 

* * * 

C6407N-D 

ASTON 64 TITOLATRICE 3/1986 

8000-10000 

* * * 

C6408N-D 

CATALOGO PROGRAMMAI986 

8000-10000 

* * * 

C6409N-D 

AFFINITÀ DI COPPIA 

4/1986 

8000-10000 

* * * 

COMMODORE 16 

C1601N-D 

SATURN 16 

10-11/1985 

8000-10000 

* * * 

C1602N-D 

CHIMICA 

10-11/1985 

8000-10000 

* * * 

C1603N-D 

ASTON 16 

12/1985 

8000-10000 

* * * 

C1604N-D 

CHAR 16 GEN. CARAT. 

3/1986 

8000-10000 

* * * 

C1605N-D 

CAMPIONATO DI CALCI04/1986 

8000-10000 

* * * 

C1606N-D 

AGENDA TELEFONICA 

4/1986 

8000-10000 

* * * 

SEGA SC 3000 

SC301N 

MATH SOFTWARE 

8-9/1985 

8000 


SC302N 

IL BOSCO MALEDETTO 

10-11/1985 

8000 


SC303N 

GEOMETRI 1 

10-11/1985 

8000 


SC304N 

DATA BASE 

12/1986 

8000 


SC305N 

GRAPH 3000 

1-2/1986 

8000 


SC306N 

ARMONIA 

1-2/1986 

8000 


SC307N 

TOPOGRAPH 3000 

3/1986 

8000 


SC308N 

DRAWER 

4/1986 

8000 


SHARP MZ 700 

MZ701N 

BIGLIETTI DA VISITA 

8-9/1985 

8000 


MZ702 

ELENCO FORNITORI 

10-11/1985 

8000 


MZ703D 

SETTE E MEZZO 

10-11/1985 

8000 


MZ704 

LO STRISCIONE 

12/1985 

8000 


MZ705N 

QUA E LÀ PER... 

12/1985 

8000 


MZ706N 

ELENCO CLIENTI 

1-2/1986 

8000 


MZ707N 

IL MURO 

1-2/1986 

8000 


MZ708N 

SHARPORGANO 

1-2/1986 

8000 


MZ709N 

THE STING 

3/1986 

8000 


MZ710N 

CACCIA ALLE LETTERE 

1-2/1986 

8000 


MZ711N 

GESTIONE MAGAZZINO 

4/1986 

8000 


TEXAS TI 99/4A 

TI 901N 

SCHEDA P. MONDRIAN 

8-9/1985 

8000 


T1902N 

LA COMETA HALLEY 

10-11/1985 

8000 


TI903 

LEONARDO 

12/1985 

8000 


TI904N 

THE LORD OF SPIDERS 

12/1985 

8000 


TI905N 

MAYA 

1-2/1986 

8000 


TI906N 

DECODIFICATORE 

1-2/1986 

8000 


TI907N 

CONVERS. ESADEC-DEC3/1986 

8000 


TI908N 

BOWLING 

3/1986 

8000 


TI909N 

PROGETTO D.A.C.I.A. 

4/1986 

8000 


TI910N 

GALAXI ADVENTURE 

4/1986 

8000 


sistemi MSX 

MSX01N 

MSX SPRITE 

8-9/1985 

8000 


MSX02N 

POKER 

8-9/1985 

8000 


MSX03N 

PIANTE FABBRICATI 

10-11/1985 

8000 


MSX04N 

GALACTICA 

10-11/1985 

8000 


MSX04N 

PAINT WITH DRAW 

12/1985 

8000 


MSX06N 

TENNIS 

12/1985 

8000 


MSX07N 

DATA WRITER 

1-2/1986 

8000 


MSX08N 

ROAD RACE 

1-2/1986 

8000 


MSX09N 

GHOST-MAZE 

3/1986 

8000 


MSX10N 

ROMPICAPO 

1-2/1986 

8000 


MSX11N 

WIMBLEDON 

4/1986 

8000 


ZX SPECTRUM 

ZXS01N 

2001 ODISSEA... 

12/1985 

8000 


ZXS02 

CONTROLLER 

12/1985 

8000 


ZXS03D 

FUSO ORARIO 

1 *-2/1986 

8000 


ZXS04 

CAMP 1 

1-2/1986 

8000 


ZXS05N 

SLALOM 

3/1986 

8000 


ZXS06N 

TOT 13 

3/1986 

8000 


ZSX07N 

DATA BASE 

4/1986 

8000 


ZXS08N 

LABIRINTO LETTERARIO 4/1986 

8000 


ZXS09N 

RENUMBER 

4/1986 

8000 



* * * Nella versione su floppy disk il prezzo sale a 1000 L'ultima lettera del codice è (N) 
per i nastri e (D) per i floppy disks. 
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ENTRO QUESTO MESE! 

Riceverai a casa tua 
per un anno 
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ISTITUTO TECNICO "BERNINI 

UNA SCUOLA TRA SPERIMENTAZIONE 
EINTERDISCIPUNARIETÀ 

Ecco una scuola "diversa”, testimone del nuovo rapporto che si sta creando tra mercato del lavoro e mondo scolastico 


Ijjjjjijj istituto tecnico ‘ Bernini", nei 
HililÉ Pressi di ponte Milvio, con i suoi 
::::::: 900 allievi, rappresenta una pia¬ 
cevole sorpresa nel panorama della: 
scuola italiana, spesso accusata di esse¬ 
re totalmente sganciata dalle richieste 
del mondo del lavoro e tesa a rinverdire 
duella, mai abbastanza deprecata, tradi¬ 
zione di separazione tra teoria e prassi, 
di crociana memoria. 
r ortunatamente oggi, a giudicare dai ri¬ 
sultati che questo istituto ha raggiunto, 
ìon è più così. 


COS’È IL 
“BERNINI” 


È un istituto tecnico industriale con una 
specializzazione (che si attua nel corso 
del triennio seguente i due primi anni) in 
chimica industriale e in edilizia. 

Il primo indirizzo, quello chimico indu¬ 
striale, si articola in 3 specializzazioni: 

1) quello chimico-industriale vero e pro¬ 
prio. 

2) quello con orientamento verso il setto¬ 


di Giancarlo Bernardi 


Il Preside del Bernini”. Ing. D'Angelo, a col¬ 
loquio con LIST 


re clinico-sanitario. 

3) quello, più marcatamente sperimenta¬ 
le, definito ‘‘deuterio’’. 

Per quanto riguarda il secondo indirizzo, 
quello edile, esso tende a costruire una 
nuova figura (i cui contorni sono d'altron¬ 
de già stati tracciati dalla nuova riforma 
della scuola secondaria superiore) di 
"tecnico totale", che dovrebbe superare 
quella, ormai inadeguata, del geometra o 
del perito edile: una nuova figura in gra¬ 
do di gestire e assorbire l'impatto delle 
nuove tecnologie con un carattere di in- 
terdisciplinarietà che sarà una costante 
di tutti i corsi di questo istituto 

E proprio da questo connubio tra speri¬ 
mentazione da una parte e interdiscipli- 
narietà dall’altra, che nasce il percorso 
culturale che sia la sensibilità del preside 
(ing. D'Angelo) sia la competenza del 
suo staff d’insegnanti, permette di segui¬ 
re. 

Questo percorso può così essere rias¬ 
sunto: 

nel corso dei primi due anni, si tende a 
dare all'alunno il bagaglio di conoscenze 
necessarie perché la successiva specia¬ 
lizzazione (che si concretizza nel trien- 
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nio) non si trasformi in sterile tecnicismo: 
è in quest’ottica che anche l’informatica 
(che almeno per il momento, non rientra 
nei programmi di studi come disciplina a 
sé stante) trova la sua identità di stru¬ 
mento atto “per pensare'’ e non “a pen¬ 
sare” 


PERCHE 

L’INFORMATICA 


In altre parole, l’informatica e l’uso del 
calcolatore, in questa prima parte degli 
studi, vengono analizzati sotto il loro 
aspetto metodologico, d’individuazione 
di quelle regole logiche che ne permetto¬ 
no una più ampia applicazione, in tutte 
quelle discipline in cui è possibile indivi¬ 
duare degli algoritmi formalizzabili (mate¬ 
matica, chimica e fisica), in modo da 
chiarire a sé stessi tutta quella potenziali¬ 
tà insita nell uso del calcolatore per otte¬ 
nere certi risultati; prodotto secondaro 
ma non certo per importanza) di questo 
modo d’intendere l’informatica è una ri¬ 
flessione sui propri stessi processi men¬ 
tali, oltreché sulla validità di uh certo tipo 
di approccio maieutico. 


LE REALIZZAZIONI 


Per quanto riguarda invece la parte spe¬ 
rimentale, ma con un occhio, sempre ri¬ 
volto alle esigenze dell’utenza, le realiz¬ 
zazioni sono a dir poco sorprendenti: 
si va da un laboratorio solare capace di 
produrre acqua distillata, creato nell’am¬ 
bito del progetto “deuterio”, con la par¬ 
tecipazione finanziaria sia dell’istituto sia 


deirilNESCQ e a cui è particolarmente 
interessato il governo del Mozambico, 
alla ralizzazione. sempre neN’ambito del¬ 
ie tecnologie “dolci (piacevole sorpre¬ 
sa, visto l’indirizzo nucleare dell appara¬ 
to statale) di un distillatore solare in gra¬ 
do di soddisfare 1/3 del fabbrisogno di 
acqua calda deH’istituto; si è messo in 
atto un piano di studio sull’inquinamento 
di questa zona di Roma, in collaborazio¬ 
ne con l’istituto di Fisica dell’atmosfera 
del CNR, uno di risparmio energetico 
(con la sperimentazione di un nuovo mo¬ 
tore in grado di “riciclare” ì prori prodotti 
dì scarto e raggiungere in tal modo un ef- 
ficenza del 90%) e così via. 

Il progetto “deuterio”, oltre che per le 
cose che abbiamo detto, risulta di parti¬ 
colare interesse, proprio pér quella sua 
caratteristica di interdisciplinarietà che si 
concretizza nel tentativo di riunire le va¬ 
rie specializzazioni chimiche (una venti¬ 
na, circa) ad un numero più ristretto, indi¬ 
viduando in queste gli eventuali punti di 
contatto: in questo, l’uso del calcolatore 
e là metodologia sistematica dell’infor¬ 
matica rientrano a pieno titolo sia come 
teoria vera e propria, sia come branca 
del controllo dei sistemi automatici. 


I RAPPORTI CON IL 
MONDO DEL LAVORO 


Possiamo quindi, riassumere quanto det¬ 
to finora, dicendo che sperimentazione 
ed interdisciplinarietà sono i “fiori all'oc¬ 
chiello” di questo istituto che poggia su 
un assunto di fondo: il lavoro inteso 
come base per la formazione dell’indivi¬ 
duo nella sua accezione più vasta; que¬ 


sto criterio è alla base anche della valu¬ 
tazione non solo degli studenti, ma an¬ 
che dello stesso metodo educativo che 
non deve, in quest’ottica diremo qqasi 
“umanìstica”, soddisfare solo a richièste 
di ordine pratico. 

Rimane comunque una scuola particolar¬ 
mente attenta alle esigenze del mondo 
del lavoro e alle richieste più avanzate 
che da questo provengono; richieste che 
vengono soddisfatte anche ricorrendo al¬ 
l’esperienza di altri istituti, non solo italìa-- 
ni ma anche europei ed americani 
Tutto questo e molto altro ancora è pos¬ 
sibile rintracciare nella pubblicazione 
che l’istituto, in collaborazione con la 
provincia, l’assessorato alla pubblica 
istruzione e quello dell’industria-com- 
mercio ed artigianato, ha edito e che 
prende il significativo nome di “Scuola- 
Lavoro” e dalla cui lettura è possibile ri¬ 
salire a quella “filosofia” che sottende il 
lavoro del preside D Angelo e dei suoi 
preparatissimi è sensibili insegnanti. 


seu 

sena 


Da sinistra verso destra: l'impianto di 
riscaldamento realizzato mediante pannelli 
solari. L’aula di “informatica ’ dove gli 
studenti eseguono, i programmi per lo studio 
delle materie. Con questo apparato e l’aiuto 
di appositi programmi, si può rilevare la 
composizione chimica e la densità di alcune 
sostanze. Il gruppo simulatore di processi 
industriali. Con questa macchina è possibile 
rilevare la densità dei materiali da 
costruzione. I professori che hanno 
partecipato al colloquio con LIST e la 
Segretaria Amministrativa che lavora alla 
macchina per gli stipendi. 
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IL PROGETTO " SCUOLA-LAVORO " 


Come abbiamo già detto nel testo, è 
possibile rintracciare la “filosofia ” 
che ispira la didattica dell’istituto 
“Bernini”, dalla lettura di questa pub¬ 
blicazione ‘Scuola-lavoro” edita dal¬ 
l’istituto stesso con la collaborazione 
degli Assessorati alla Pubblica Istru¬ 
zione e di quello déli’lndustria. 

In questo volume sono presenti molti 
interventi, non solo quelli dello staff 
insegnante del ‘‘Bernini”, ma anche 
di altri istituti, tra quelli più attenti alle 
esigenze di un rapporto più stretto e 
continuativo tra scuola e mondo del 
lavoro. 

Questa esigenza si riflette anche sulla 
creazione di un nuovo modo d’inten¬ 
dere la didattica e di quello di una di¬ 
versa valutazione del ruolo dell’inse¬ 



gnante. 

La pubblicazione, che adotta un lin¬ 
guaggio mai didascalico, è interes¬ 


sante non solo per l’insegnante, che 
vede in tal modo una sua più precisa 
collocazione all’interno del processo 
produttivo e della scuola stessa, ma 
anche per quegli operatori industriali 
e sindacali che nella scuola vedono 
un naturale ”serbatoio” di quelle figu¬ 
re professionali con le quali dovranno 
confrontarsi negli anni a venire. 

Una conoscenza, quindi, delle proble¬ 
matiche connesse con la formazione 
di nuove o consuete figure professio¬ 
nali, dovrebbe rendere meno trauma¬ 
tico il loro contatto con il mondo del 
lavoro è garantire una maggiore effi¬ 
cienza del loro utilizzo. È in quest’otti¬ 
ca che la lettura di questo interessan¬ 
tissimo testo, trova la sua validità e 
metodologia d’impiego. 


L'INFORMATICA NELLA 
SCUOLA ELEMENTARE: 
LE ESPERIENZE DI 
CIVITA VECCHIA 

I nuovi programmi della scuola elementare, che saranno resi operativi tra qualche anno, portano una piccola rivoluzione nei contenuti didattici della 
Scuola Elementare. In particolare, si fa menzione per la prima volta in assoluto dell’informatica, che entra nella scuola, per così dire di soppiatto, 

legata ai contenuti dell’area matematica. 

di Paolo Ciancarini 


ia come sia, la novità ha acceso facili entusiasmi e tre¬ 
mende opposizioni. I primi dovuti al fatto che si guarda 
al computer come ad una magica panacea per una mi¬ 
riade di situazioni (per esempio, il recupero degli handicappati), 
che dovrebbero essere invece affrontate con spirito critico (es. 
l’insegnamento della programmazione BASIC). Le seconde do¬ 
vute in ultima analisi alla paura viscerale che colpisce in gene¬ 
re un adulto che è costreto a sedersi per la prima volta di fronte 
ad una tastiera. 

Questo mese LIST è andata a Civitavecchia, dove in due diver¬ 
se scuole elementari (il Primo e il Secóndo Circolo) si sono 
svolte negli ultimi anni esperienze molto differenti, in un certo 
senso complementari. 

La sperimentazione condotta nel Primo Circolo ormai da alcuni 
anni, e diretta dal prof. M Laeng, non ha come primo obiettivo 
l’uso del computer Negli ultimi due anni gli alunni di una clas¬ 
se sperimentale (progetto pilota a livello nazionale), che prima 


avevano molto lavorato coi diagrammi di flusso e il materiale 
strutturato (Dienes, Selvi) sono stati parzialmente introdotti alia 
programmazione col linguaggio BASIC. Per il prossimo anno è 
prevista l’introduzione del LOGO. 

Al Secondo Circolo l’introduzione deirinformatica è stata più 
intensiva, ma meno integrata col lavoro normale in classe. 
Dopo due corsi di aggiornamento cui Hanno partecipato tutti gli 
insegnanti della scuola, è iniziata un attività affidata ad una 
insegnate che coordina il lavoro di un centinaio di bambini. 
Tutto il lavoro è stato incentrato sul LOGO: dopo un primo 
approccio iniziale i bambini si sono concentrati su progeti com¬ 
plessi come la creazione di fiabe animate. Sono anche state 
tentate alcune esperienze con bambini handicappati. 

È certamente presto per trarre delle conclusioni da queste espe¬ 
rienze pionieristiche; l’unica che ci sentiamo di sottoscrivere è 
questa: non crediamo che i computer nella scuola siano prede¬ 
stinati ad acchiappapolvere: i bambini non lo permetteranno! 
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IL BAMBINO TECNOLOGICO 


Prima di introdurre l’utilizzazione dell’elaboratore in alcune classi di un plesso del II Circolo di Civitavecchia ci è sembrato indispensabile approfondire 
sia l’aspetto teorico dell’applicazione dell’informatica nella scuola elementare, che le esperienze in atto. 


di Franco Maria Carapellese 

(Direttore Didattico II Circolo Civitavecchia) 


iìpip ' a l cune di queste ultime si à 
jillpjl; apprezzato lo sforzo e l'impegno 

. :ii:s dei docenti, ma di tutte si è 

rifiutata l’accettazione di fondo: l’elabo¬ 
ratore visto come macchina per inse¬ 
gnare e come sussidio didattico per 
rispondere a questionari a risposta mul¬ 
tipla per le singole materie, per esercizi 
di ortografia, ecc. Anche il linguaggio 
usato in tali esperienze ci è subito 
apparso troppo complesso e quindi poco 
gratificante, insomma non adeguato a 
consentire agli alunni una libera espres¬ 
sione delle loro possibilità ed una altret¬ 
tanto libera applicazione dei propri desi¬ 
deri e progetti. 

A livello teorico l’incontro con le propo¬ 
ste di S. Papert (S. Papert — “Mind- 
Storms”, Ed. EMME) ci è apparso 
particolarmente significativo non soltan¬ 
to per l’originalità delle stese quanto per 
la loro giustificazione pedagogica. 

Se è vero che l’elaboratore incide sullo 
sviluppo dei processi mentali e sul 
nostro modo di pensare e di apprende¬ 
re, la responsabilità della Scuola e la 
preparazione dei docenti assumono un 
ruolo fondamentale perché, come dice il 
Papert, “i bambini che apprendono a 
programmare un elaboratore si servono 
di modelli informativi per riflettere su 
come si pensa, per apprendere come si 
apprende”. Programmare un elaborato¬ 
re, cioè fare un programma, significa 
usare un linguaggio che sia l’utente che 
la macchina comprendono. 

Il linguaggio LOGO ci è sembrato il più 
valido anche per gli alunni delle scuola 
elementare e nell’a.s. 1984/85, dopo un 



L’aula del II Circolo con le “postazioni" 
Commodore. 



Due bambini al lavoro per “costruire” 
con il Logo un Presepe. 


corso di aggiornamento deliberato dal 
collegio dei docenti e autofinanziato, 
abbiamo introdotto in alcune classi l’uso 
degli elaboratori nella prospettiva educa¬ 
tiva e pedagogica del Papert secondo 
l’ottica dell’“apprendimento piagettia- 
no”. Questo è un ‘‘apprendimento sen¬ 
za insegnamento” (l’insegnante non ha 


un programma da svolgere. Si pensi per 
la grafica pittorica ad A. Stern) giustifi¬ 
cato dal fatto che “i bambini sono essi 
stessi costruttori delle loro strutture 
intellettuali”, Infatti essi ‘‘molto tempo 
prima di andare a scuola accumulano 
una gran quantità di conoscenze me¬ 
diante un processo che io definisco — 
continua il Papert — apprendimento 
piagettiano o apprendimento senza inse¬ 
gnamento”. 

Sono dunque gli alunni i veri protagoni¬ 
sti, i programmatori dei propri progetti, 
ed essi utilizzando il LOGO ‘‘apprendo¬ 
no un linguaggio per parlare di forma, di 
velocità e di qualità, di cambiamento, di 
processi e di procedure. Essi apprendo¬ 
no a parlare matematica...”. 

La Tartaruga della grafica del LOGO è 
veramente un oggetto-per-pensare e lo 
strumento appropriato per l’“apprendi- 
mento senza insegnamento”. 

Infine appena un cenno ad una ardita 
ipotesi, non ancora verificata dallo stes¬ 
so Papert che ne è l’autore, in relazione 
al pensiero operatorio-concreto che il 
bambino raggiunge a 7-8 anni di età ed 
al pensiero operatorio-formale o ipoteti- 
co-deduttivo che il ragazzo si forma 
verso gli 11-12 anni: l’utilizzazione del¬ 
l’elaboratore in ambiente LOGO è in 
grado di tradurre il formale in concreto e 
quindi può consentire l’acquisizione del 
pensiero formale con anni di anticipo 
rispetto alla data sopra indicata. 

Oggi nel II Circolo abbiamo un laborato¬ 
rio con 7 elaboratori con i quali lavorano 
gruppi di alunni di 9 e 10 per volta, per 
circa due ore la settimana. 


UN'ESPERIENZA COL "LOGO 


Quel 13/11/84, gli alunni dì 4 classi (una terza, una quarta, due quinte) hanno vissuto il loro 

incontro che non li ha certo spaventati- 


primo incontro con due elaboratori Commodore 64, 


di Donata Striano 

(Insegnante) 


iUpi a spaventato più me che ero la 
j|Hiji ' oro insegnante, delegata dal Di- 
re ttore a dedicarmi totalmente a 
questa nuova attività integrativa. 

Grazie all’uso del LOGO, è stata 
un’esperienza entusiasmante e stimolan¬ 


te sia per me sia per i miei allievi, tutti 
impegnatissimi nell’apprendere le prime 
nozioni del linguaggio che avrebbero 
usato con l’elaboratore. 

Dopo il primo approccio con questi stru¬ 
menti, i bambini hanno cominciato, attra¬ 


verso semplici comandi, a portare a 
spasso la Tartaruga. Loro erano i mae¬ 
stri, la Tartaruga l’allievo che imparava 
qualcosa da loro. 

Ai due elaboratori lavoravano due gruppi 
di 3-4 bambini della stessa classe. In 
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/ /arar/ dei bambini del II Circolo di Civitavecchia: sono le sequenze di un Presepe “costruito” con il Logo. 



questo modo ciascun bambino ha lavora¬ 
to circa un’ora alla settimana per un pe¬ 
riodo di circa 6 mesi. 

Quest’anno i computer sono diventati 7, 
ciascuno dotato di drive: i bambini lavo¬ 
rano generalmente in gruppi di due (mol¬ 
to meglio dell’anno scorso), e ormai molti 
vogliono addirittura lavorare da soli. 

I bambini più dotati a volte mi aiutano 
nell’istruire i loro colleghi. 

Alcuni bambini, una volta seduti davanti 
all’elaboratore, pensavano che la Tarta¬ 
ruga potesse fare tutto, tanto è vero che 
la prima cosa che un bambino ha digitato 
sulla tastiera è stata: 

FAMMI UN CAVALLO Ma si è subito reso 
conto che questa frase non voleva dire 
nulla e che per ottenere qualcosa biso¬ 
gnava invece dare alla Tartaruga una se¬ 
rie di comandi: AVANTI, INDIETRO, DE¬ 
STRA, SINISTRA, seguiti da uno spazio 
e da un input numerico. 


La prima difficoltà è stata quella relativa 
alla concettualizzazione delle differenze 
esistenti tra comandi di spostamento e 
comandi di rotazione della Tartaruga. 
Per la maggior parte di loro, infatti, DE¬ 
STRA voleva dire GIRA e VAI AVANTI a 
DESTRA, ma presto si resero conto che 
dovevano dare due comandi separati. 
Altra difficoltà incontrata è stata quella 
concernente la quantificazione degli an¬ 
goli. Spesso nel far ruotare la Tartaruga i 
bambini non valutavano adeguatamente 
l’argomento simboleggiante l’angolo, per 
cui davano un input troppo piccolo o 
troppo grande. Allora erano costretti a 
tornare indietro e a modificare il numero 
introdotto. 

Un bambino ha provato una volta a far 
eseguire una rotazione di 420 gradi, e 
subito si è chiesto come mai una tale ro¬ 
tazione produceva un angolo minore di 
uno di 90 gradi. Riprovando, si è reso 


conto prima che una rotazione di 360 
gradi equivale a nessuna rotazione, e poi 
che l’angolo da lui descritto era equiva¬ 
lente a uno di 60. 

Una volta introdotti al mondo della Tarta¬ 
ruga, ai bambini è stato suggerito di fo¬ 
calizzare i loro sforzi su progetti com¬ 
plessi. In particolare, lo scorso anno è 
stata prodotta una “fiaba elettronica’’ 
ideata e sceneggiata dai bambini, e rea¬ 
lizzata col LOGO (n.d.r: cfr. il libro “lo 
parlo LOGO”, di Paolo Ciancarini, edi¬ 
zioni EDICOMP). L’entusiasmo è stato 
tale che, non potendo essere usate le 
ore scolastiche per il lavoro lontano dal 
computer, i bambini hanno lavorato in 
casa. 

Quest’anno, finora, il progetto più impor¬ 
tante è stato la realizzazione di un prese¬ 
pe elettronico, nel quale i bambini hanno 
fatto tesoro delle esperienze dello scorso 
anno. 


LA SCUOLA ELEMENTARE 
E L'INFORMATICA: 


CUOI 


Dal 1987/88 nella scuola elementare italiana entreranno gradualmente in vigore i nuovi programmi, varati definitivamente nel 

di Roberto Mobili 

(Direttore Didattico 1° Circolo Scuole Elementari di Civitavecchia) 

CUOIA ___ • • 

, ijpjjjjj! uesti, tra le novità, contengono ri- 
iililii ferimenti all’informatica, definen¬ 
done gli obiettivi e le indicazioni 
didattiche. Questi riferimenti non avreb¬ 
bero senso in questa delicata fascia del¬ 
l’educazione di base se non venissero in¬ 
quadrati e attuati in un contesto che ne 
giustifica ampiamente la presenza. 

Nel settore dell'Informatica i nuovi pro¬ 
grammi richiamano l’attenzione, da un 
lato, sull’elaborazione deH’informazione, 
sull’idea di algoritmo e la capacità di 
tracciare e interpretare diagrammi di 
flusso, dall’altro, sulla presentazione del 
calcolatore come strumento di esplora¬ 
zione del mondo dei numeri, di elabora- 
zione e di interazione; mettono tuttavia in 


guardia da facili “infatuazioni” che po¬ 
trebbero venire da uno strumento “tec¬ 
nologicamente sofisticato”. 

Da una analisi attenta della maggior par¬ 
te delle discipline scolastiche si evince 
che queste si fondano su una esigenza 
di offrire strumenti che diano ordine alle 
proprie esperienze, prerequisito fonda- 
mentale su cui costruire una cultura per¬ 
sonale. Pertanto è giustificata la preoc¬ 
cupazione di non far coincidere informa¬ 
tica e computer; l’informatica, difatti, 
scaturisce, dal documento, come strate¬ 
gia metodologica per raggiungere l’obiet¬ 
tivo principale, rappresentato “dall’ap- 
prendere ad apprendere”. 

Le classi sperimentali del 1° Circolo di Ci- 


WOLA 
CU OLÀ 


88 


vitavecchia, che seguo dal 1982, hanno 
impostato il loro lavoro tenendo presen¬ 
te, fin dalla classe dei bambini di 5 anni, 
l’obiettivo del raggiungimento di abilità 
nel linguaggio informatico in senso am¬ 
pio. Si è proceduto a lavorare con eserci¬ 
zi, giuochi ed attività ispirati alla ricorsivi- 
tà, all’ordine sequenziale di racconti ed 
eventi, all’algoritmizzazione di situazioni 
problematiche, alla registrazione di dia¬ 
grammi di flusso per mezzo di disegni, 
simboli, parole e semplici frasi. Compare 
anche il computer dalla terza classe in 
poi, con l’utilizzo del linguaggio BASIC, 
ma appunto come conseguenza di tutto il 
lavoro precedente. 

Nelle scuole elementari italiane si stanno 
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sviluppando ricerche che direttamente o 
indirettamente si propongono l’introdu¬ 
zione dell’informatica e/o dell’uso del 
computer. Alcune di queste ricerche, cir¬ 
ca una ventina, sono state avanzate al 
Ministero della P.l. come progetti speri¬ 
mentali, ma appena sei sono state rico¬ 
nosciute come vere sperimentazioni. Per 
lo più mancavano i requisiti essenziali 
che caratterizzano un esperimento. In al¬ 
cuni casi il computer, introdotto nella 
scuola, non si discosta da quegli stru¬ 
menti che tradizionalmente vengono usa¬ 
ti (libro, lavagna, sussidi vari), ma anche 
in questo ambito è mancata una intera¬ 
zione accuratamente programmata, in 


modo che si possa pensare ad un pro¬ 
getto in cui l’istruzione viene assistita dal 
calcolatore (C.A.I). 

Nei casi in cui si avviano gli alunni all’ap¬ 
prendimento dei linguaggi per dialogare 
con il computer (BASIC, Logo), ci trovia¬ 
mo di fronte ad una semplice aggiunta di 
una nuova disciplina scolastica, anche 
qui senza la necessaria integrazione con 
la programmazione globale di classe o di 
interclasse. 

Pochi sono i casi in cui ci si trova di fron¬ 
te ad una proposta che identifica il pro¬ 
blema in relazione soprattutto al concetto 
di algoritmo, oltre che all’alfabetizzazio¬ 
ne informatica; in tal modo le ipotesi 


òbUULi 

sono tese a ricercare vie per l’apprendi¬ 
mento della programmazione, da parte SCUOL 
degli alunni, nel senso di “imparare ? 
pensare in maniera procedurale e logi¬ 
ca”, pianificando l’azione, organizzando 
dati, rispettando regole, il tutto in un con- SCUÙl 
testo interattivo con le altre materie. 

Occorre senza dubbio seguire i vari pro¬ 
getti, pubblicare e confrontare risultati, 
discuterne e fare chiarezza nella scuola SCUOL 
in questo settore, prima che l’informatica 
si trasformi in moda con tutti i rischi che 
ciò comporta, primo fra tutti quello di per¬ 
dere l’occasione di porre il sistema sco- SCUOL 
lastico all’altezza dei tempi. SCUOL 

SCUOL 


I PROCESSI DI ASTRAZIONE 
E LOGICI DEL PENSIERO 


Il bambino che si fa adulto presuppone l’evoluzione delle sue facoltà 
logiche e di astrazione; è compito peculiare della scuola elementare 
studiare i modi più idonei ed efficienti per sollecitare lo sviluppo di 
tali facoltà potenzialmente in atto. 

di Luciano Luzzi 


pjp educazione all’interpretazione dei 
Hi simboli, all’individuazione struttu- 
rale delle cose-eventi-concetti, 
alle funzioni consequenziali alle caratte¬ 
ristiche delle strutture manipolate, al ri¬ 
conoscimento ulteriore della generalizza¬ 
zione di un concetto che produce una re¬ 


gola, all’applicazione della regola per de¬ 
terminare razionalmente situazioni etero¬ 
genee da comprendere e risolvere, sono 
il percorso di un’educazione/istruzione 
intesa al rispetto delle tappe evolutive 
del pensiero e contemporaneamente 
consapevole dei contenuti da trasmette¬ 


re lungo questo iter. 

Per quanto detto il computer può assu¬ 
mere una valenza didattica importante; 
uno strumento idoneo ad addestrare e 
potenziare la razionalizzazione del pen¬ 
siero. 

Si tratta di istruire l’alunno preliminar- 
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IL GIOCO DEL PIATTINO 


Diagramma di flusso linguistico 


Diagramma di flusso in linguaggio BASIC 
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mente sull’uso della tastiera (conoscen¬ 
do i bambini, è un’operazione breve nel 
tempo e facile da apprendere) ed istruirlo 
sulle fondamentali funzioni del linguag¬ 
gio che comunica col computer (anche 
questa operazione non richiede lungo 
tempo). Ciò che invece ha bisogno di 
una programmazione attenta e ben con¬ 
gegnata, oltreché articolata, è l’opportu¬ 
nità di addestrare il bambino a struttura¬ 
re il proprio pensiero in senso logico-se¬ 
quenziale, con l’espressione di enunciati 
minimi ed essenziali rappresentati in 
simboli. È un grosso lavoro che va attua¬ 
to nei primi due anni del ciclo elementare 
e che può dare ottimi risultati se condotto 
con gradualità e metodo. Una volta che il 
bambino si è appropriato della tecnica e 
della strumentalità linguistica di base per 
il funzionamento del computer, gli si pre¬ 
sentano brevissimi programmi listati che 
egli interpreta e traduce seguendo la se¬ 
quenza logica dell’impostazione. Come 
si può notare, è un espediente efficace 
per sollecitare l’attenzione e la mentalità 
dell’allievo a calarsi continuamente nel¬ 
l’analisi della struttura di un’azione, sia 
essa matematica o di altro genere. È la 
stessa caratteristica di funzionamento 
del computer che consente un’educazio¬ 
ne/istruzione di questo tipo e aiuta l’inse¬ 


gnante nel suo compito, con l’apporto ol¬ 
tremodo motivante di un gioco quasi 
“magico”: il pensiero che diviene azione 
tangibile e voluta attraverso la macchina 
che lo traduce. Inizialmente si prestano 
molto bene programmini che determina¬ 
no operazioni matematiche o l’esecuzine 
di movimenti predeterminati di una palli¬ 
na sullo schermo. In un secondo momen¬ 
to, il bambino stesso esegue il suo sem¬ 
plice listato ed i compagni lo interpretano 
e lo verificano. È facile immaginare quali 
potenzialità educative possono espletare 
simili situazioni. Quelli accennati sono 
piccoli esempi esplicativi di utilizzazione 
del computer in terza elementare, che 
evidenziano quali e quanti siano gli svi¬ 
luppi che da esso si possono pretendere 
per potenziare, ma vorrei dire anche pre¬ 
correre, i processi di astrazione e logici 
del pensiero; non solo, il computer divie¬ 
ne anche lo strumento motivante per sol¬ 
lecitare quello che deve essere un atteg¬ 
giamento mentale e comportamentale 
nelle varie situazioni: predisporsi verso 
un’abilità cosciente di pianificazione di 
ogni azione per mezzo dell’osservazione 
analitica dei dati obiettivamente necessa¬ 
ri al fine che si è prefissato, superando 
ogni fase egocentrica e negativamente 
personalistica di valutazione e confron¬ 


tandosi con gli altri attraverso un mutuo 
intervento sulla ricerca effettuata. 

Nel seguente esempio (eleborazione per¬ 
sonale di bambini di IV classe) si affronta 
l’acquisizione di abilità tecniche e logi¬ 
che per la formulazione di programmi ar¬ 
ticolati da inserire, come verifica, nel 
computer. 

Le abilità logiche (addestrate in questo 
senso ormai da quattro anni) riguardano 
l’impostazione di un diagramma di flusso 
sopra un evento, nelle sue connotazioni 
integrate di sequenzazione-selezione-ite- 
razione. La caratteristica metodologica 
costante delle attività proposte riguar¬ 
da l’equivalenza tra la rappresentazio¬ 
ne grafica della sequenza diagramma¬ 
tica in lingua e quella elaborata in lin¬ 
guaggio BASIC. 

Contenuto del gioco: un mazzo di carte 
napoletane viene posto al centro del 
gruppo degli alunni. Il giocatore “pesca” 
la carta (coperta) superiore. Perde e de¬ 
posita al “banco” la scommessa se la 
carta pescata è uguale od inferiore al n. 
5, altrimenti vince e ritira la scommessa. 
Nel gioco riportato viene posta una varia¬ 
bile: il giocatore che perde ha diritto di 
“ripescare” fino al momento della sua 
vittoria. 


UN PO DI STORIA' 


LA 


// 


MEMORIA" DEL 
COMPUTER 

la “Stampa” e la “Radio”, ecco la “memoria storica” di una delle più radicali rivoluzioni tecnologiche del progresso ui 

di Giancarlo Bernardi 


n articolo apparso sulla prestigio¬ 
sa rivista Newsweek del Febbraio 
del 1982, forniva alcune previsioni 
sull’andamento del mercato dei personal 
computer, fissando attorno ai 50 milioni il 
numero di questi, vendibili entro il 1985: 
assieme a queste ottimistiche previsioni, 
altri autorevoli personaggi prevedevano 
l’instaurazione di un nuovo ordine socia¬ 
le, umanistico e postmaterialistico (sic!) 
in un pianeta in grado di vivere di “lega¬ 
mi istantanei” (ancora sic!). 

Oggi, anno di grazia 1986, il mercato dei 
personal registra una flessione, anche 
nelle sue punte di diamante (Apple, IBM, 
ecc..); il nuovo ordine, ci sembra di poter 
dire, è molto poco postmaterialistico (am¬ 
messo che questo termine abbia un sen¬ 
so), insomma ancora una volta la storia 
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Anche il transistor oramai ha una storia: sulla 
sinistra è visibile un “vecchio" OC 76 di di¬ 
mensioni enormi rispetto ad un recente BC 
103 (a destra). Attualmente queste ultime si 
sono ulteriormente ridotte in transistor di at¬ 
tuale produzione. 


non sembra aver rispettato il corso che le 
sue condizioni iniziali, sembravano detta¬ 
re. Perché? 

Tenteremo di dare una risposta a questi 
e ad altri interrogativi con una serie di 
articoli, tesi ad individuare o, più umil¬ 
mente, a tracciare quella che ci sembra 
manchi completamente ai cosiddetti 
esperti che, dimentichi del loro originario 
ruolo culturale, si sono trasformati troppo 
in fretta in piazzisti di questa o quella 
marca di computer: intendiamo cioè indi¬ 
viduare la vera “memoria” del computer, 
la sua storia, la storia delle sue trasfor¬ 
mazioni e delle sue modificazioni: una 
storia che per quanto breve, già fin da 
ora è possibile tracciare per individuare 
in essa i segni o di una sua crescita o di 
una involuzione. 
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I PARTE 
L’HARDWARE 
LA MICROELETTRONICA 

La generazione di chi scrive ha fatto an¬ 
cora in tempo a vedere le vecchie radio 
attorno a cui i padri ascoltavano una tra¬ 
smissione domenicale dall’inquietante ti¬ 
tolo di “Gran Varietà”, mentre per l’aria 
si diffondeva l’odore del pollo e delle pa¬ 
tate arrosto, segno deH’ormai raggiunta 
opulenza. E ha fatto ancora in tempo a 
prendere gli ultimi schiaffi per aver voluto 
dare un’occhiata dentro quell’oggetto 
gracidante musichette che avrebbero in¬ 
ciso per sempre la propria psiche. Ebbe¬ 
ne dentro, miei giovani lettori, c’erano 
enormi minareti trasparenti, in cui brilla¬ 
va flebile una linea arancione: molto più 
tardi chi scrive venne a sapere da antichi 
testi, che quei misteriosi oggetti avevano 
il nome di valvole termoioniche e si basa¬ 
vano su un principio, detto appunto, prin¬ 
cipio termoionico, scoperto da Edison, 
nel lontano 1883 e che consiste nell’e¬ 
missione di particelle cariche (elettroni) 
da parte di un metallo portato ad alta 
temperatura. 

Per quanto le radio di quei tempi ormai 
lontani fossero belle esteticamente 
(come può essere bello un mobile antico) 
avevano però l’incoveniente di essere al¬ 
trettanto ingombranti, senza contare la 
quantità di energia necessaria per per¬ 
mettere l’innesco del principio di cui si è 
detto: arriviamo in tal modo alla data che 
può essere veramente presa come data 
d’inizio di tutta la storia dei calcolatori, il 
1948, che vede la nascita di un oggetto 
dalle dimensioni ridotte, da un ridotto di¬ 
spendio di energia e daH’aumentata effi- 


cenza: il TRANSISTOR (o transsitore): 
quasi contemporaneamente nasce il pri¬ 
mo calcolatore numerico programmabile 
e il connubio tra un nuovo prodotto e una 
nuova applicazione segna l’inizio di 
un’accelerazione addirittura esponenzia¬ 
le in cui cercheremo di stabilire alcune 
tappe a nostro avviso fondamentali. 


Nel 1956 i signori Brattain, Berdeen e 
Shockley ricevono il premio Nobel per la 
scoperta dell’effetto transistor (1948) e 
per la sua successiva applicazione. Ma 
cos’è un transistor e a cosa serve, o me¬ 
glio, serviva? 

Per capire meglio osserviamone il funzio¬ 
namento attraverso il suo schema elettri¬ 
co. 



Come si vede dalla figura vi sono 2 batte¬ 
rie: la prima polarizza la parte destra del 
materiale di tipo (Negativo) ad un poten¬ 
ziale maggiore di zero, rispetto al mate¬ 
riale di tipo (Positivo): questo impedisce 
il passaggio di corrente dalla zona p alla 
zona n. 

La seconda batteria polarizza il materiale 
p ad un potenziale leggermente (questo 
leggermente è importante) superiore ri¬ 


spetto a quello del materiale n di sinistra, 
per cui si ha un debole passaggio di cor¬ 
rente da quest’ultima alla zona p, mentre 
alcune “buche” (cariche positive) po¬ 
tranno fluire da p ad n. 

Se le impurità della zona n sono maggio¬ 
ri di quelle della zona p, il flusso di cor¬ 
rente sarà costituito essenzialmente da 
elettroni da n a p, piuttosto che da “bu¬ 
che”, dalla zona p ad n: a questo punto 
la zona di destra n, con il suo potenziale 
positivo attira gli elettroni, facendoli usci¬ 
re attraverso la resistenza R2. È intuibile 
che essendo le “buche” cariche positi¬ 
ve, queste tenderanno a ricombinarsi 
con gli elettroni, per cui dette cariche po¬ 
sitive devono essere poche in modo da 
non annullare il flusso di elettroni e que¬ 
sto è ottenibile solo se il materiale di tipo 
p è sufficientemente “puro”, ossia non 
presenta i cosidetti “difetti reticolari”. 

A questo punto è chiaro che con un mini¬ 
mo dispendio di energia, necessario per 
creare quella leggera differenza di poten¬ 
ziale tra la parte di sinistra di tipo n e la 
zona di tipo p, si ha un gran numero di 
elettroni che esce da R2; il transistor è 
quindi un amplificatore, di basso costo 
energetico e dalle dimensioni ridotte: 
queste sono le due caratteristiche che ne 
hanno determinato il successo industria¬ 
le, ma è altrettanto evidente che la sua 
nascita è legata da un lato all’introduzio¬ 
ne di un nuovo modo di intedere i costi¬ 
tuenti elementari della materia (bu¬ 
che = cariche positive = difetti reticola¬ 
ri = atomi mancanti di un elettrone) e dal¬ 
l’altro dalla possibilità pratica su scala in¬ 
dustriale di avere a disposizione materia¬ 
li “puri”, ossia materiali che presentino 
un numero molto ridotto di difetti reticola¬ 
ci. 


IL TRANSISTOR 


1 

A tutti coloro che fanr 
Y/W Invece di L. 55.000 pc 

yV ^ le: alle pagine 81/82 

C SX ^ “EH, ma ricordatevi eh 

y zio, il timbro della Scu 

J il ricevimento dell’imr 


... Presidi, Direttori, Insegnanti, Studenti 
e per tutto il Personale scolastico. 

A tutti coloro che fanno parte della “ Scuola”, LIST offre l'abbonamento all numeri con il 30% di sconto. 
Invece di L. 55.000 potrete abbonarvi con sole 38.500 lire. Per abbonarsi a queste favolose condizioni è faci¬ 
le: alle pagine 81/82 troverete il modulo di c.c.p. per effettuare il versamento delle 38.500 lire, (soluzione 
U B”), ma ricordatevi che affinché questa offerta sia valida, dovete far apporre sul modulo, nell’apposito spa¬ 
zio, il timbro della Scuola di appartenenza. L’abbonamento decorrerà dal primo numero raggiungibile dopo 
il ricevimento dell’importo versato. 
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SCUOLA E COMPUTER 
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ISPEAK PROLOG 

Il PROLOG è uno dei linguaggi più moderni oggi disponibili su microcomputer. Questa è la seconda parte di un corso introduttivo per 

‘non’ esperti di programmazione logica. 


!!j|p rima di addentrarci nel mondo affasci- 
jiiSp nante della programmazione logica, 
iliflfilinii dobbiamo avere qualche nozione sulla 
logica in sé. La volta scorsa abbiamo parago¬ 
nato la logica ad un gioco i cui pezzi sono le 
parole, le cui mosse sono deduzioni e il cui 
obiettivo è dedurre la verità o meno di certe 
frasi, chiamate proposizione, a partire da altre 
frasi, chiamate assiomi. Alio scopo di chiarire 
il senso di questo gioco, ci siamo riferiti ad un 
divertente e poco conosciuto lavoro di Lewis 
Carroll, l’autore di Alice nel Paese delle Mera¬ 
viglie. 


IL GIOCO DI CARROLL 


Questo lavoro si intitola “Il gioco della logica”, 
ed è stato pubblicato in Italia aualche anno fa 
dalle edizioni Astrolabio. 

La volta scorsa abbiamo lasciato in sospeso 
questo problema. Supponiamo di sapere che 
le seguenti frasi sono vere: 

— gli uomini discendono dalle scimmie; 

— alcuni discendenti delle scimmie sono pe¬ 
losi; 

Il problema posto è il seguente: si può dedurre 
a partire da queste frasi che alcuni uomini 
sono pelosi? 

Il metodo di Lewis Carroll funziona più o meno 
così: costruite un diagramma come questo: 

DISCENDENTI SCIMMIE 
PELOSI 

NON DISCENDENTI SCIMMIE 
NON PELOSI 

Ed ecco il significato: il quadrante A rappre¬ 
senta i discendenti delle scimmie che sono 
pelosi, il quadrante B quelli non pelosi, il dia¬ 
gramma C gli esseri pelosi che non discendo¬ 
no dalle scimmie (es.: i visoni), il diagramma D 
gli esseri glabri che non discendono dalle 
scimmie (es. i pesci). I quadranti interni 
(EFGH) hanno lo stesso significato di quelli 
esterni corrispondenti (rispettivamente 
ABCD), solo che contrariamente a questi ri¬ 
guardano gii esseri umani: per esempio, in H 
ci sono gli esseri umani che non discendono 
dalle scimmie e non sono pelosi. In teoria po¬ 
tremmo porre in uno (e solo uno) di questi 
quadranti qualsiasi essere vivente. 

A Questo punto Carroll dà una serie di regole 
per piazzare sul diagramma alcuni gettoni ros¬ 
si e blu: dalla loro disposizione si potrà ricava¬ 
re quasi AUTOMATICAMENTE una risposta. 
Non possiamo qui dilungarci troppo: se andre¬ 
te a leggervi il libro di L. Carroll vi divertirete 
molto di più. 

Vi anticipiamo la conclusione del gioco, che 
come detto è del tutto AUTOMATICA: la frase 
NON è deducibile dalle premesse (non si sa 
se è vera o falsa). 

Infatti la situazione potrebbe essere la se¬ 


di Paolo Ciancarini 

(Dipartimento d’informatica di Pisa) 

guente, rappresentata mediante diagrammi in¬ 
siemistici: 

discendenti-scimmie 

pelosi 

uomini 

cioè l’insieme degli uomini e l’insieme delle 
scimmie potrebbero non avere elementi in co¬ 
mune (se per esempio tutti gli uomini decides¬ 
sero di radersi tutti i peli). 

Notate che nel mondo come lo conosciamo 
esistono uomini pelosi, ma questo non signifi¬ 
ca nulla per la logica, che ammette che una 
frase è vera solo se è vera in TUTTI i mondi 
possibili. 

Poiché nel nostro caso la frase è falsa almeno 
in un mondo (anche se ipotetico), allora non è 
vera. In pratica questo significa che le infor¬ 
mazioni che abbiamo non sono sufficienti a 
stabilire la verità della frase. Notate che il gio¬ 
co di Carroll riesce a stabilire questo risultato. 


UNA BANCA DI DATI 


Tutto il discorso precedente aveva lo scopo di 
introdurre la logica in maniera intuitiva. Que¬ 
sto discorso si estende alla programmazione 
logica. 

La caratteristica più appariscente del PRO¬ 
LOG è che non esistono parole primitive: è un 
linguaggio fatto di regole in cui si usano le 
parole dell'Italiano. 

Un programma PROLOG è fatto di frasi. Tali 
frasi stabiliscono delle RELAZIONI tra degli 
oggetti. Per esempio 
“Paolo è il padre di Gianni” 
è una frase ammessa, che stabilisce una rela¬ 
zione (è padre) tra l’oggetto Paolo e l’oggetto 
Gianni. La relazione è chiamata PREDICATO 
(il nome è derivato dall’analisi logica). 


BIBLIOGRA FIA 
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K.L. Clark e F G. McCabe 
MicroProlog: Programming in Logic 
Prentice-Ha!l International, 1983 

Logic for Problem Solving 
NorthHolland, 1979 

W.F. Clocksin e C.S. Mellish 
Programming in PROLOG 
SpringerVerlag, 1981 
(sta per uscire una traduzione in italiano) 
J.R. Ennals 

Beginning MicroPROLOG 
Harper-Row, 1984 
T. Conlon 

Start Problem Soving with PROLOG 
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Notate che in PROLOG questa frase non vie¬ 
ne scritta in questa forma. Per ragioni che ve¬ 
dremo più avanti questa frase va scritta nella 
maniera seguente: 

“Paolo è-padre-di Gianni” 
cioè il predicato che mette in relazione i due 
oggetti va scritto tutto attaccato. Per ragioni di 
leggibilità si usano i trattini. 

Altri esempi di frasi: 

“Giorgio è-impiegato Fiat” 

, “Marina ama Riccardo” 

“Pippo è-un Cane” 

“La-carne costa Lire-10.000” 

In altre parole una frase ha sempre la stessa 
struttura: è composta di due tipi di parole: gli 
oggetti, che potremmo anche chiamare “indi¬ 
vidui”, e le loro relazioni, che chiameremo 
“predicati”. 

Oliando usate il PROLOG le parole debbono 
essere comunque unite: scrivere LA CARNE 
non va bene, occorre unire le parole col tratti¬ 
no. Inoltre distingueremo gli individui dai pre¬ 
dicati col trucco di scrivere i primi con l’iniziale 
maiuscola. 

Come vengono immesse queste frasi nel com¬ 
puter? Ammesso che possiediate una versio¬ 
ne del Micro-PROLOG (per esempio quella 
per lo SPECTRUM), bisogna che carichiate 
prima l’interprete, poi il modulo SIMPLE. A 
questo punto ogni relazione che volete memo¬ 
rizzare deve essere scritta così: 


Queste frasi si chiamano RELAZIONI BINA¬ 
RIE, perché gli individui sono sempre due. Si 
possono anche scrìvere relazioni con uno o 
tre e più individui. Per esempio, “due più due 
fa 5” si può scrivere così: 


L’obiettivo di chi scrive un programma in 
PROLOG è di porre una domanda cui il siste¬ 
ma risponde in base alle frasi che conosce. 
Le frasi possono essere di due tipi: fatti e re¬ 
gole. I fatti sono frasi che stabiliscono relazio¬ 
ni tra un certo numero di individui: 


Occupiamoci per ora di programmi composti 
soltanto di fatti. Un programma di questo ge¬ 
nere è una banca di dati, e può essere INTER¬ 
ROGATO. L’effetto del programma, a partire 
dall’interrogazione, è di terminare con una o 
più risposte. 

Esempio: 

Supponiamo di descrivere le posizioni degli 
alunni di una classe nei loro banchi mediante 
un sistema di coordinate tipo battaglia navale. 

Paolo è-in Al 
Lucia è-in A2 
Catuscia è-in A3 


è-somma (2 2 5) 


Enrico legge La-Bibbia 
Maria è-donna 
Manzoni nato-a Milano 


add (Paolo è-padre-di Gianni) 
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Aldo è-in B1 
Moreno è-in B2 
Simorte è-in B3 
Fosca è-in CI 
Paola è-in C2 
Alina è-in 03 

A questo punto possiamo porre alcune do¬ 
mande. il primo tipo di domanda ammessa è 
la conferma di un fatto: 

È vero che Paolo è-in C2? 

Il MicroProlog vuole che questa domanda sia 
posta nella forma che segue: 

is (Paolo è-in C2) 


La risposta, in questo caso, sarà NO. 

Invece, alla domanda 

is (Paolo è-in Al) 

la risposta sarà affermativa (YES). 

Un tipo di domanda più interessante è la ri¬ 
chiesta d| un dato: 

Chi è-in B2? 

Tale domanda va posta così: 
which (x x è-in B2?) 
e la risposta è 
Moreno 

No (more) answers. 


L’ultima frase significa che non ci sono più 
risposte. 

Notate la flessibilità del PROLOG: con la stes¬ 
sa forma si può anche chiedere 
Dov’è Paola? , 

la forma da usare è ia seguenti: 

which (x: Paola è-in x) 

e la risposta è 
C2 

No (more) answers 

La lettera x usata nella domanda è una VA¬ 
RIABILE. Le variabili ammesse dal 
MicroProlog sono 6: x, y, z, X, Y, Z. 


COSA OCCORRE PER USARE IL PROLOG 


Per chi volesse cimentarsi da subito nella programmazione PRO¬ 
LOG, accludiamo una nutrita bibliografia ed una descrizione som¬ 
maria dei PROLOG più fàcile da trovare in Italia: quello per lo SPE- 
CTRUM. 

Per programmare col PROLOG occorre un programma traduttore 
chiamato INTERPRETE. L’interprete si preoccupa di tradurre i pro¬ 
grammi nei linguaggio della macchina che ‘come è noto’ è comun¬ 
que un linguaggio basato su codice binario. 

Fino a poco tempo fa il PROLOG si poteva usare solo con grossi 
calcolatori. Oggi esiste un programma interprete del PROLOG per 
lo SPECTRUM e per tutte le macchine basate su processore Z80 e 
sistema operativo CP/M: si chiama Micro-PROLOG. 

Per il Commodore .64, che ha diverso processore e sistema operati¬ 
vo, è stata annunciata una versione su disco da una casa ingiese 
(LPA) verso la fine dello scorso anno. Non appena sarà disponibile 
in Italia ne daremo comunicazione ai nostri lettori. 

Per questi articoli ci baseremo, almeno inizialmente, sulla versione 
per SPECTRUM. 

Per usare il PROLOG su SPECTRUM, occorre: 


— procurarsi il programma interprete su nastro 

— caricarlo col comando LOAD ‘PROLOG ’ 

— caricare i successivi programmi di utilità col comando LOAD 
SIMPLE 

Terminata la fase dì caricamento di SIMPLE, siete pronti per pro¬ 
grammare in PROLOG. Il PROLOG segnala di essere pronto ad 
accettare il nuovo programma mediante il "prompt”. 

Le operazioni primitive permesse dal SIMPLE sono le seguenti: 

1. Creazione e modifica dei programmi: 
add (clausola) per aggiungere fatti e regole 
èdit predicato 

n# clausola cancella solo una particolare clausola 

2. Interrogazione: 

is (fatto [&...fatto]) chiede la conferma di fatti 
which (seq. di variabili: fatto [&...fatto]) 

ES. which. (x: Madre (Maria x)) trova tutte le figlie di Maria, 
one (seq. di variabili: fatto [&...fatto]) stessa funzione di which, ma le 
risposte sono date una alla volta. 
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SCUOLA Nel primo gioco — SORTER — viene 
data al bambino una chiave da seguire 
(chiave che può essere selezionata} per 
l'ordinamento di cinque parole — ad 
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MATCH UP 



GUSLA 
WOLA 
WOLA 
WOLA 
WOLA 
WOLA 
WOLA 
WOLA 
WOLA 
WOLA 
WOLA 
WOLA 
WOLA 
tL’LLLS& 


Sorter - la parola non corrispondente alla chia¬ 
ve indicata viene scartata. 

esempio, tutte devono iniziare con la let¬ 
tera “S”. 

Determinato il criterio di ordinamento, 
cominciano ad essere visualizzate sullo 
schermo, una alla volta, delle parole; al¬ 
cune di queste corrispondono effettiva¬ 
mente alla chiave indicata e devono es¬ 
sere ‘conservate’ su degli scaffali appo¬ 
sitamente predisposti, altre invece no e 
devono essere scartate nell’adibito bido¬ 
ne. 

Non appena cinque parole hanno trovato 
posto sugli scaffali, Reader Rabbit — il 
simpatico coniglietto-mascot che accom¬ 
pagna il bambino nei vari esercizi — ini¬ 
zia in segno di gioia a ballare al ritmo di 
un nuovo motivetto. 

Nel caso che nel corso dell’esercizio una 
parola errata sia stata conservata o una 
corretta scartata, questo viene ripetuto 
senza la possibilità di variare la chiave di 
ordinamento. 

Oltre al criterio di gioco, all’inizio dell’e¬ 
sercizio è possibile selezionare anche la 
velocità secondo la quale le parole devo¬ 
no essere visualizzate. 


_ LABELER _ 

Il secondo esercizio — LABELER — pre¬ 
vede l’associazione di vocaboli e figure 
unitamente alla costruzione delle parole 

stesse 

Tre figure vengono visualizzate; sotto 
ognuna di esse si apre una finestrella 
nella quale il bambino deve inserire la 
parola corrispondente. 

Quindi nella parte inferiore dello scher¬ 
mo, trovano posto tre ‘scatoloni’ conte¬ 
nenti, nell’ordine, le lettere necessarie 
alla formazione delle parole: 

— nel primo (a sinistra) le tre iniziali; 


Labeler - l’esercizio ha inizio. 

— nel secondo (al centro) le tre centrali; 

— nel terzo (a destra) le tre finali. 

Il bambino dopo aver mentalmente asso¬ 
ciato figure e parole, dovrà scrivere que- 
st’ultime utilizzando correttamente le let¬ 
tere messe a disposizione. 

L’esercizio prevede ben nove varianti di 
gioco, ciascuna delle quali ha un proprio 
set di minimo sei figure per un totale di 
oltre 70 immagini. 

Gli argomenti contemplati sono: 
gli animali, i mezzi di locomozione, la 
casa, la cucina (intesa come ambiente), il 
mondo esterno, la gente, giochi ed abbi¬ 
gliamento, contenitori, miscellanea. 

Dopo aver familiarizzato con i primi due 
esercizi ed avere dunque una discreta 
padronanza dei vocaboli utilizzati, il bam¬ 
bino può passare al terzo gioco. 


_ WORD TRAIN _ 

Nella stazioncina del villaggio di Reader 
Rabbit, un treno-merci formato da una lo- 
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Word Train - due parole hanno trovato posto 
sui vagoni del trenino. 

comotiva e tre vagoni sta aspettando il 
carico da trasportare per poter partire, 
mentre alcuni camion sono già in attesa, 
pronti a scaricare la loro merce. 
Analizzando il vocabolo di partenza — 
scritto sulla locomotiva — e quelli indicati 
dai camioncini, il bambino deve indivi- 
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Match Up - una delle opzioni di gioco 

Il quarto esercizio proposto — MATCH 
UP — è senza dubbio indicato per i bam¬ 
bini di sette anni. 

È basato, oltre che sul riconoscimento 
dei vocaboli e la loro associazione alle 
rispettive immagini, soprattutto sulla me¬ 
moria visiva, in quanto si tratta di ritrova¬ 
re e formare delle coppie nascoste nel 
minor numero di tentativi possibile. 

Sei le varianti di gioco previste: 
coppie di figure, coppie figura-parola, 
coppie figura-lettera (iniziale, centrale o 
finale), coppie parola-parola. 

Si consiglia comunque di seguire l’ordine 
di selezione indicato, almeno all’inizio. 
Scelta la variante di gioco, sullo schermo 
viene visualizzata, prima di tutto, la serie 
di vocaboli e/o figure sulla quale verterà 
l’esercizio; quando il bambino ritiene di 
aver sufficientemente memorizzato 
quanto proposto, ad un suo comando si 
passa all’esercizio vero e proprio: sullo 
schermo appare un numero pari di carte 
sotto le quali si nascondono le varie cop¬ 
pie che il bambino dovrà formare. 

La varietà degli “esercizi-gioco” propo¬ 
sta è tale da consentire, indubbiamente, 
l’uso costante del pacchetto senza teme¬ 
re che il bambino, scadendo l’interesse 
nei confronti di quanto presentato, si an¬ 
noi e non assimili le nozioni indiretta¬ 
mente impartite. 

Il programma è provvisto di una guida 
per l’uso indirizzata, data la giovanissima 
età degli utenti, a genitori e/o insegnanti, 
con alcuni suggerimenti per sfruttare gli 
esercizi indipendentemente dal compu¬ 
ter stesso. 
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5 DOMANDE SUL LOGO 

Questo spazio è dedicato agli Studenti e agli Insegnanti che vogliono porci dei quesiti di genere “Scolastico ”, 


Sono un insegnante elementare, e sto studiando il 
LOGO come strumento didattico. 

1. Come si fa a passare una procedura come varia¬ 
bile ad un’altra procedura? 

2. In LOGO esiste una funzione corrispondente alla 
variable Tl$ del BASIC? Si può cioè calcolare lo scor¬ 
rere del tempo? 

3. Come posso generare delle serie di numeri ca¬ 
suali che si allungano man mano che l’utente indovi¬ 
na? 

4. Qual è il significato, nel LOGO IBM delle seguenti 
primitive: 

TYPE, RECYCLE, STAMP, KEYP, PEN, REPARSE 
SEQUENCE, CATCH e THROW? 

5. Nel libro “Computer è facile” di E. Pentiraro (La- 
terza) è contenuto un programma chiamato TRIS, 
che apparentemente non funziona. Sarebbe possibi¬ 
le averne la versione corretta per C64? 

Vittorio Deimoro - Pesaro 

1. Per pasare una procedura A come variabile :B da 
eseguire dentro un ’altra procedura C, occorre inseri¬ 
re A in una lista. Esempio: 

PER FIGURA.A.CASO 


AS “FIGURE [QUADRATO CERCHIO 
RETTANGOLO] 

AS “SCELTA ELEMENTO (1 + ACASO 3) 
:FIGURE 

PROVA (LISTA : SCELTA) 

FINE 

PER PROVA :PROCEDURA 
ESEGUI :PROCEDURA 
FINE 

2. No, in LOGO Commodore NON si può calcolare il 
trascorrere ASSOLUTO del tempo (non esiste Tl$). 
Si può bloccare il programma per un tempo a piace¬ 
re con la procedura che segue: 

PER ASPETTA :SECONDI 
RIPETI 300 * rSECONDI [ ] 

FINE 

In realtà, se proprio vuoi un orologio assoluto, che 
continua a ‘ticchettare ’ anche mentre vengono ese¬ 
guite altre procedure, una soluzione c’è: ma bisogna 
che ti studi il linguaggio macchina. Dovrai pure usare 
l’istruzione .ESAMINA per analizzare il contenuto bi¬ 
nario di un paio di celle di memoria. 

3. Penso che mostrarti direttamente il programma 


che esegue il gioco sia la risposta migliore (LOGO 
Commodore inglese). Come verificherai, abbiamo 
fatto delle semplificazioni, rispetto aH'originale. Per 
esempio, non si controlla la legalità della mossa in¬ 
serita. Te la lasciamo per esercizio... 

4. Ecco le corrispondenze IBM-Commodore 

TYPE a SCRIVI 
RECYCLE m PACTUTTO 
STAMP m TIMBRACAR 
KEJP a TASTO? 

PEN a funzione senza argomenti che restituisce 
una lista contenente lo stato della Tartaruga (LOGO 
Aplle) le stesse informazioni si ricavano dalla funzio¬ 
ne LOGO Commodore STATOSCHERMO (abbr. 
SS). Vedi il manuale. 

CATCH a THROW sono sicuramente intraducibili col 
LOGO Commodre: controlliamo la presenza di una 
condizione ovunque si verifichi durante l’esecuzione 
la loro simulazione comporterebbe che dopo OGNI 
singola istruzione fai una SE ... ALLORA ... 

5. Ci ho messo un po’, ma finalmente ecco il pro¬ 
gramma, che ho verificato funzionante (LOGO Com¬ 
modore versione inglese): 


■ TO GIOCO 

LOCAL "LISTO.SEGRETA 
LOCAL "NUMERO. TENTATIVI 
MOKE "LISTO.SEGRETO [3 
MOKE "NUMERO.TENTATIVI 1 
GIOCO 
END 

TO GIOCA 
PREPARARE 
GIOCARE 

MOKE "NUMERO.TENTATIVI : NUMERO.TENTATIVI 


TO GIOCARE 

IF : LISTA.SEGRETA = [3 THEN STOP 
PRINT CINDOVINA] 

MOKE "PROVA FIRST RQ 

IF :PROVA < FIRST :LISTA.SEGRETA PR [TROPPO PICCOLO] 
IF : PROVA > FIRST :LISTA.SEGRETA PR [TROPPO GROSSO 3 
IF : PROVA = FIRST :LISTA.SEGRETA PR [BRAVO] 

‘ LISTA.SEGRETA 
GIOCARE 


IN.POS.DUE 
0 0 

A . CASA 
TPIS1 [ ] 

END 

TO D.SCH 
NT PU 

SETXY 20 - 60 ) 

PO BG 1 
PC 0 
END 

TO TRIS1 :VLX 

D.SCH 
GRIGLIA 
PU A.CASA PD 

MOKE “VLX GIOCO [3 [3 !VLX 

cs 

PR [RICOMINCIAMO 7 3 
TRIS1 :VLX 

F NO 

TO A.CASA 

PU SETXY 20 < - 60 ) PD 

Et\B 


TO G 

LT 90 FD 80 RT 90 
END 


TO E 

FD 40 LT 90 FO 40 RT 
EMI 


MAKE "VL OOVEC.E :M :VL 

IF < COUNT : VL ) < 2 OP MUOVI. A. CASO : Lrr. MAKE "MOSSE FIRST BF : VL 
IF MEMBER7 SMOSSE :L THEN OP MUOVI.A.CASO :L ELSE OP SMOSSE 
END 

TO MUOVI :M :L :VL 
MAKE “MOSSE INTELL :M :L :VL 
TEST MEMBER"» SMOSSE :L 
IFT OP MUOVI SM :L :VL 

IFF PR < SE "0 : MOSSE ) RUN < LIST "O SMOSSE > OP : MOSSE 
END 

TO SONO : IT :L 
IF : IT = [3 OP "TRIJE 

IF NOT MEMBER*’ FIRST :IT :L THEN OP "FALSE ELSE OP SONO BF : IT :L 
END 

TO VINCI :L 

IF SONO [1 2 33 :L OP "TRUE 

IF SONO [4 5 63 :L OP "TRUE 

IF SONO [7 8 93 :L OP "TRUE 

IF SONO [1 4 73 :L OP "TRUE 

IF SONO [2 5 83 :L OP "TRUE 

IF SONO C3 S 93 :L OP "TRUE 

IF SONO [1 5 93 :L OP "TRUE 

IF SONO [3 5 73 :L OP "TRUE 

OP "FALSE 
END 

TO FAI.MOSSA :L 
MAKE "MOSSA FIRST REGHJEST 
IF SMOSSA = [CIAO 3 THEN TOPLEVEL 
OP SMOSSA 
END 

TO GIOCO :LX : LO :VLX 
PR [TOCCA A TE 3 
MAKE "L SE -LX : LO 

MAKE "LX LPUT < FAI.MOSSA :L > :LX 
X LAST s LX 

IF VINCI '• LX THEN PR [HAI VINTO, MA REGISTRO IL MIO ERRORE 3 OP LPUT ! LX : VLX 
MAKE "L SE :LX : LO 

IF SONO [1234567893 !L THEN PR [PARI!] OP :VLX 
MAKE "LO LPUT MUOVI < LAST :LX 1 :L :VLX : LO 
IF VINCI ! LO THEN PP [HO VINTO 103 OP :VLX 
OP GIOCO :LX : LO :VLX 
END 

TO COLONNA 

FD 120 LT 90 FD 40 LT 90 
FD 120 RT 190 
E1-ID 

TO PETTINE 
REPEAT 3 [COLONNA 3 
END 

TO GRIGLIA 
PE TT INE 
A.CASA 
FD J 20 

LT 90 PETTI ME RT 90 
END 

TO OOVEC.E :M :VL 
IF :VL = [3 OP [3 
MAKE “VL 1 C.E iM FIRST '• VL 

IF :VL1 = CI THEN OP OOVEC.E :M BF :VL ELSE OP :VL1 

END 

TO C.E : ELE sLIS 
IF :L IS = C 3 OP [3 
IF i ELE = FIRST :LIS OP :LIS 
OP C.E :ELE BF :LIS 
END 

TO POSI : N 

RUN < SE ITEM SNIABCDEFGHI3 > 

EMO 


TO D 

FD 40 LT 90 FD 80 RT 90 
END 


TO C 

PO 80 


DfCi 


TO B 

FD 80 LT 90 FD 40 RT 90 
NO 
TO A 

FD 80 LT 90 FD 80 RT 90 
E NO 


TO SCEGLI :LIST 

OP ITEM < 1 + RANDOM 3 > 5LIST 

E NO 


TO O ! N 

IF sN > 0 THEN POSI IN 
PU FD 20 PD 

REPEAT 36 [FO 3.5 LT 10] PU BK 20 
A.CASA 

Ero 

TO IN.POS.DUE 
IN.POS.UNO 
PU BK 80 PO 


TO X IN 

IF IN > 0 THEN POSI IN 
LT 45 FO SQRT 3200 PU 
LT 135 FD 40 LT 135 PO 
FO SQRT 3200 LT 45 PU BK 40 
A.CASA 
END 


TO MUOVI.A.CASO ILIST 
OP SCEGLI CI 234567833 
END 

TO INTELL tM :L lVL 


TO IN.POS.UNO 
PU RT 45 

FO SQRT 12800 LT 45 PD 
END 
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Con questa interfaccia, un Commodore 64, e un buon 
programma potete gestire automatica ment e la vos tra 
casa. 

Ecco un circuito elettronico con cui, 
tramite un Commodore 64 e un pro¬ 
gramma, potete pilotare otto dispositi¬ 
vi elettrici alimentati dalla tensione di 
rete. 

Di questa interfaccia, oltre allo sche¬ 
ma elettrico, mostreremo un prototipo 
“molto sperimentale” che abbiamo 
realizzato per collaudare il circuito. 


_IL PRINCIPIO 

Il Commodore 64 è corredato di un 
circuito di interfaccia, il 6526, denomi¬ 
nato CIA (niente a che fare con l’omo¬ 
nima Intelligence americana, si spe¬ 
ra!) acronimo di Complex Interface 
Adapter. 

A queso circuito fanno capo sia l’in¬ 
terfaccia RS232, sia due porte di In¬ 
put/Output (A e B). 

Ebbene la gestione delle porte di I/O 
è quanto di più semplice si possa im¬ 
maginare. 

Alla locazione 56579 (in esadecimale 
$dd03) è locato il Registro Direzione 
Dati (DDR), tramite il quale è possibile 
stabilire quali dei bit della porta A (o 
B) siano utilizzati in Input o in Output. 
La porta B, che fa capo alla locazione 
di memoria 56577 ($DC01), è connessa 
ai piedini da C ad L della User Port 
(cfr. con l’appendice del manuale 
d’uso del C64). 

Al piedino A della User Port è connes¬ 
sa la massa. 

Quando uno degli otto bit della porta 
B, numerati da PBO a PB7, è settato ad 
uno, e se il bit è impostato ad Output, 
sul corrispondente contatto della User 
Port si presenta una tensione positiva. 
Per impostare ad Output un bit della 
porta B, basta impostare ad 1 il bit del¬ 
lo stesso posto del DDR. 

Dal momento che il nostro circuito uti¬ 
lizza tutti gli otto bit della porta B, por¬ 
remo tutti i bit del DDR ad 1, digitando 
POKE 56579,255. 

A questo punto ogni volta che il bit di 
ordine n della locazione 56577 è ugua¬ 
le ad uno, il dispositivo connesso ad 
esso entrerà in funzione. 


IL CIRCUITO 


Il circuito di interfaccia che vogliamo 
proporre è molto semplice. 

Ai contatti della User Port sono con¬ 
nessi dei fotoaccoppiatori (da OC1 
per il contatto C, a OC8 per L). 

L’uso di questi dispositivi è molto con¬ 
veniente in circuiti di questo genere. 


L’ELENCO DEI MATERIALI 

TI trasf. alim. 220V/8V-0,5A 
SI interruttore 
RS1 raddrizzatore 100V/1A 
CI 220 mf 25V elettrolitico 
R1-R8 200 Ohm-1/2 Watt 
R9-R16 150 Ohm-1/2 Watt 
TR1-TR8 transistor NPN BC207 
TRC1-TRC8 triac 400V/6A 
OC1-OC8 fotoaccoppiatori 4N27 


Come si può infatti vedere nello sche¬ 
ma elettrico, essi sono dei contenitori 
all’interno dei quali sono sistemati un 
LED, che emette nell’infrarosso, cui si 
affaccia un fototransistor, la cui giun¬ 
zione è sensibile (ovviamente all’infra¬ 
rosso): quando nel led passa una cor¬ 
rente di intensità sufficiente esso con¬ 
duce, e la luce che emette pone in 
conduzione il relativo fototransistor. 

In questo modo, tra i terminali di in¬ 
gresso e quelli di uscita del fotoac¬ 
coppiatore, non c’è alcun passaggio 
di corrente. Così siamo sicuri che 
qualsiasi cosa accada al nostro circui¬ 
to il computer non ne sarà danneggia¬ 
to. 

Naturalmente non dovrà superarsi il 
valore della tensione di isolamento tra 
ingresso ed uscita (che comunque nel 
nostro caso è di 1500 volt!). 

Per capire come vanno collegati i fo¬ 
toaccoppiatori osservate le relative fi¬ 
gure. 

Tornando al circuito vediamo che 
quando il fotoaccoppiatore OC1 entra 
in conduzione, nel transistor TRI, nor¬ 
malmente interdetto, scorre una cor¬ 
rente di base che lo fa entrare in con¬ 
duzione. 

In questo modo attraverso la resisten¬ 
za R9 passa una corrente che genera 
ai suoi capi una tensione che applica¬ 
ta al gate del TRIAC TRC1, lo fa entra¬ 
re in conduzione. 

Come si vede dallo schema lo stadio 
di pilotaggio dei TRIAC viene alimen¬ 
tato dal secondario del trasformatore 
Tl, dopo che la corrente da esso ero¬ 
gata viene raddrizzata dal ponte di 
diodi RS1 e livellata dal condensatore 
elettrolitico Cl. 

Sempre dallo schema si vede che la 
massa dello stadio di pilotaggio è in 


IL COSTO 

DELLA REALIZZAZIONE 

— Componenti 

L. 

18.000 

— Basetta armata 

L. 

3.000 

— Trasformatore 

L. 

15.000 

— Contenitore 

L. 

8.000 

Totale 

L. 

42.000 


jjjjjjjjjjjj: 


comune con uno dei terminali con¬ 
nessi alla tensione di rete. 

Il circuito ha una evidente struttura 
modulare: i vari TRIAC, con i relativi 
circuiti di pilotaggio sono posti in pa¬ 
rallelo. 


LA REALIZZAZIONE PRATICA 


Abbiamo riportato, in grandezza natu¬ 
rale, il disegno del circuito stampato 
(lato rame) con le indicazioni per i 
componenti da montare; esso è leg¬ 
germente diverso da quello del proto¬ 
tipo illustrato nelle foto. 

L’interruttore SI e il fusibile FS1 pos¬ 
sono, a scelta, essere montati sullo 
stampato (prevedendo nel caso ulte¬ 
riori piste di collegamento) o sul con¬ 
tenitore del circuito. Per collegare il 
circuito al C64 si deve utilizzare un 
connettore lineare da 12+12 contatti 
(passo 4 mm.) separati; se, come è 
molto probabile, non doveste reperir¬ 
lo in commercio dovrete adattarvi con 
uno più lungo e di passo uguale se¬ 
gandone la parte eccedente. 

Per evitare la rottura della presa nella 
User Port (realizzata direttamente sullo 
stampato del computer) è bene faccia¬ 
te attenzione a posizionare il connetto¬ 
re della nostra interfaccia all’altezza 
giusta. 

Se si volesse utilizzare il circuito per 
alimentare dispositivi che dissipino 
notevoli potenze (i TRIAC possono so¬ 
stenere un carico massimo di 2400 
Watt) converrà modificarlo, sisteman¬ 
do i TRIAC sui lati o in qualsiasi altro 
modo che permetta di fissarvi degli 
elementi radianti di raffreddamento. 
Per il resto, a parte le ovvie raccoman¬ 
dazioni sul rispetto della corretta pola¬ 
rità neirinserimento di LED, transistor, 
TRIAC e del ponte RS1, il montaggio 
del circuito non presenta difficoltà de¬ 
gne di nota. 

Nel realizzare il nostro prototipo ab¬ 
biamo utilizzato un contenitore poco 
“snello” per potervi inserire sia il tra¬ 
sformatore che otto prese da 220 volt 
da pannello. Chi volesse inserire il 
circuito in un contenitore più sottile 
potrebbe usare un trasformatore toroi¬ 
dale e rinunciare alla monoliticità del 
lavoro connettendo a parte una ra¬ 
strelliera con le prese. 


LE APPLICAZIONI 


Se il circuito una volta montato funzio¬ 
na, con esso possiamo comandare 
ben otto dispositivi qualsiasi funzio¬ 
nanti a 220 volt. 

La prima cosa da utilizzare a scopo di¬ 
dattico che viene in mente, sono delle 
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In alto lo ‘‘stampato” a grandezza naturale (lato rame). In basso il circuito lato 
componenti. Il morsetto ‘‘comune” va collegato ad ognuna delle 8 prese 
(terminale); ciascuno dei morsetti 1-8 va connesso al terminale di ogni presa. I 
Led vanno montati su basetta o collegati con fili per poterli fissare al 
contenitore del circuito. 
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In alto e in basso: come va inserita 
l'interfaccia sul Commodere 64. 

A destra il circuito montato all'interno del 
contenitore. 

In basso a destra un programmino per 
collaudare il funzionamento 
dell'interfaccia. 




10 P0KE56579,255 ! REM PONE LA PORTA B AD OUTPUT 
20 P0KE56577,0 : REM AZZERA TUTTI I BIT DELLA PORTA B 
30 GOSUB 2000 ; REM INIZIALIZZA IL FLAG DI ACCESO/SPENTO 
40 GETAt: IFA$=""THEN 40:REM ATTENDE LA PRESS IGNE DI UN TASTO 


103 A =VALiA$)!N(A > = -N < A)s B=B +21(A-1)*N(A)!IFA >=8THEN RETURN 


00 FOR A=1 TO 8 s N<A) = -1 • NEXTB: RETURN 



A sinistra è rappresentato un TRI AC; al 
centro un transistor (visto dal basso), 
affinché possiate riconoscere i terminali. 

A sinistra si vede come ai terminali 1 e 2 
dei fotoaccoppiaton è collegato il LED 
interno, mentre a quelli 4,5 e 6, 
rispettivamente, l'emettitore, la base e il 
collettore del fototransitor ricevente. Per 
riconoscere i terminali, fate attenzione alla 
tacca circolare impressa sull'involucro e 
disposta come in figura. 

lampadine: si potrebbe digitare un 
programma che le accenda secondo 
un ordine casuale, oppure una se¬ 
quenza ordinata qualsiasi. 

Vi proponiamo, invece, un primo pro¬ 
grammino con cui accendere o spe¬ 
gnere una o più lampadine (o altro) 
premendo uno dei tasti da 0 a 8, in 
modo che la prima pressione accenda 
e la successiva spenga: 

Per applicazioni più serie pensiamo, 
ad esempio alla programmazione del¬ 


50 IFA VAL(A$> < =3THENGQSUB100 
60 GOTO40 


110 IF A=0 THEN GOSUB 288 
120 P0KE56577,B:RETURN 


l’accensione (in opportuni momenti 
della giornata) degli elettrodomestici, 
o dell’impianto di riscaldamento, o di 
un sistema di irrigazione di un giardi¬ 
no, o della sveglia la mattina... 

Ma c’è di più: per esempio possiamo 
connettere alla porte di casa dei mi¬ 
crointerruttori che fungano da “allar¬ 
me” per la messa in funzione (o l’arre¬ 
sto) dei dispositivi connessi al nostro 
circuito. Se poi pensiamo di poter 
sfruttare la possibilità di realizzare del¬ 


le routine di interruzione, le cose co¬ 
minciano a farsi veramente interessan¬ 
ti. 

È nostra intenzione comunque ripren¬ 
dere il discorso nei prossimi numeri e 
ampliarlo con dei concreti suggeri¬ 
menti applicativi. A questo proposito 
invitiamo anche tutti i lettori che han¬ 
no dei suggerimenti interessanti a 
partecipare allo sviluppo di questa 
idea. 
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SUGGERIMENTI 




COSA SONO LE LINEE DI FORZA? PERCHÉ SI SMAGNETIZZA UNA CASSETTA? COME EVITARLO? 

La carta 
metallizzata che 
usate in cucina è 
l’ideale per 
“difendere” la 
vostra cassetta. 


di Giancarlo Bernardi 


en lungi dal volere una rubrica del 
iijljp: tipo i “consigli del chip”, analoga 
•!•■■■■!■■■■! a q ue || e famigerate dei giornali 
femminili tipo “i consigli del cuore”, (non 
me ne vogliano le gentili lettrici), quello 


che ci proponiamo in questo spazio è di 
dare qualche consiglio, dettato sia dall’e¬ 
sperienza di chi scrive, come anche di 
chi legge (una volta che ce lo faccia sa¬ 
pere), sul come superare quei piccoli in¬ 


convenienti che qualunque utente di 
computer ha sperimentato. Come anche 
il modo di potenziare o proteggere la no¬ 
stra amata “macchinetta”. 
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IL PROBLEMA 


La smagnetizzazione delle cassette (e 
non solo di queste, ma anche dei dischi) 
rischia di sconvolgere il delicato equili¬ 
brio psichico sia dell’autore della casset¬ 
ta che di quello dell’utente che si accin¬ 
ge a “caricarla” sul suo personal: in 
nome della pace tra questi due “popoli” 
diciamo subito che la maggior parte delle 
volte, data per scontata la buona fede 
dell’autore dei programmi, se questi non 
“girano” sul vostro personal il responsa¬ 
bile non va cercato tra questi ma bensì 
nella Natura che ha voluto inventare una 
cosa come i campi magnetici che, oltre a 
trovarsi su sofisticatissime astronavi in 
viaggio da Venere ad Antares, si trovano 
anche attorno ai nostri prosaici elettrodo¬ 
mestici o ai più lenti mezzi di trasporto 
(leggi tram). 

Per scendere nel concreto tutti sanno o 
dovrebbero sapere che se mettiamo un 
aghetto magnetico vicino ad un filo per¬ 
corso da corrente, questi subirà una de¬ 
flessione dalla sua verticale; questo si¬ 
gnifica in altre parole che attorno a qual¬ 
siasi conduttore si crea un campo ma¬ 
gnetico, rappresentabile tramite una li¬ 
nea (linea di forza) che avvolge il suddet¬ 
to conduttore. L’inventore di queste linee 
di forza, molto più “materiali” di quanto 
comunemente si creda, fu il figfio di un 
maniscalco, Michael Faraday una delle 
menti più brillanti ed anche più simpati¬ 
che di tutto il pensiero scientifico occi¬ 
dentale (vedi biografia). Per Faraday 
qualsiasi conduttore era come intrappo¬ 
lato entro delle “reti” costituite dalle li¬ 
nee di forza, che andavano da una carica 
all’altra (per quelle del campo elettrico) a 
cui erano concatenate quelle del campo 


magnetico, in verso perpendicolare a 
quest’ultime. 

Quando si registra un programma su un 
nastro magnetico si fornisce un ordine al 
materiale ferromagnetico di questo, un 
po’ come disporre in un certo modo tanti 
aghetti magnetici: se si ha la sbadataggi¬ 
ne di avvicinare questa sequenza ad un 
conduttore percorso da corrente, que¬ 
st’ordine verrà alterato, rendendo incom¬ 
prensibile il senso del messaggio insito 
nell’ordine stesso. 

Per usare una terminologia più scientifi¬ 
ca diremo che supponendo di avere una 
distribuzione arbitraria di correnti, loca¬ 
lizzata in una certa regione di spazio, do- 


STATE LONTANI 
DA LORO: 

SONO I 10 NEMICI 
DA EVITARE 

Gli oggetti che seguono sono da 
evitare accuratamente: dischetti e 
cassette è meglio che non si trovino 
nelle loro vicinanze. 

Televisori 

Radio 

Impianti Hi-Fi 
Casse acustiche 
Elettrodomestici 
Cavi elettrici 
Fotocopiatrici 
Contatori della luce 
Alimentatori 
Trasformatori 


vremo analizzare il vettore d’induzione 
magnetica (che, senza entrare in detta¬ 
glio, è quello che ci fornisce il verso e 
l’intensità del campo magnetico) in punti 
che sono a distanza molto maggiore del¬ 
le dimensioni lineari di detta distribuzio¬ 
ne. In questi punti troveremo che il cam¬ 
po descritto da questo vettore è un cam¬ 
po di dipolo (un dipolo è associabile intui¬ 
tivamente al nostro aghetto magnetico) 
che tenderà ad allinearsi parallelamente 
alle linee di forza del campo magnetico, 
in modo, tra l’altro, da rendere minima la 
sua energia potenziale. 

Quindi se potessimo inforcare gli “oc¬ 
chiali” di Faraday vedremo le nostre la¬ 
vatrici, i nostri televisori, le nostre radio, 
e chi più ne ha più ne metta (basta che si 
tratti di un conduttore percorso da cor¬ 
rente) avviluppate da reti scintillanti fatte 
dalle loro linee di forza, tanto più intense 
e a maglie tanto più fitte, quanto più que¬ 
sti conduttori siano male schermati. 


LA SOLUZIONE 


Come ovviare a tutto ciò? Sarà sufficien¬ 
te avvolgere la vostra cassetta (non il 
contenitore, ovviamente) con della carta 
stagnola: la stessa che usate in cucina 
per conservare i cibi (anche se loro non 
hanno di questi problemi). In questo 
modo il diverso valore di un termine detto 
“permeabilità magnetica” dei due mate¬ 
riali, farà si che il campo elettromagneti¬ 
co aH’interno sia nullo, proteggendo in tal 
modo l’ordine dei preziosi bit disposti sul 
nastro. Con l’augurio di non “caricare” 
una tavoletta di cioccolato e mangiare 
una cassetta di “strip poker” vi salutia¬ 
mo e... attenti alle linee! 


MICHAEL FARADAY 


Nasce presso Londra nel 1791, da un padre maniscalco e 
da una madre, oggi si direbbe “casalinga”; appartenne per 
tutta la vita, come i suoi genitori, ad una setta religiosa nota 
sotto il nome di Sandemaniani. Povero, fece i più svariati 
mestieri, tra cui il giornalaio e poi il rilegatore di libri. Com¬ 
pletamente autodidatta, ebbe la fortuna di conoscere e il 
modo di farsi apprezzare, da Sir Humphry Davy, rettore del¬ 
la Royal Institution. 

Esordì con un lavoro intitolato “Rotazione di una corrente 
attorno ad un magnete e rotazione di un magnete attor¬ 
no ad una corrente”, in cui getta le basi di quella che fu la 
sua più brillante intuizione, quella delle linee di forza, con¬ 
cetto che permise di superare la nozione di “azione a di¬ 
stanza”, la cui insufficienza era nota da tempo e che già 


Gauss, in una lettera a Wilhelm Weber, nel 1845, tentava di 
superare con un’idea molto simile dal sonoro nome di “Kon- 
struierbare” e che si può tradurre con qualcosa simile ad 
“azione a contatto”. 

Scoprì il fenomeno dell’induzione magnetica (1831), la co¬ 
stante dielettrica, studiò il comportamento dei materiali para 
e diamagnetici. 

“... completamente digiuno di matematica” (A Sommerfeld), 
aveva un modo di lavorare estremamente creativo ed intuiti¬ 
vo che gli costava però un enorme sforzo intellettuale che lo 
costrinse più volte a sospendere o riprendere i propri lavori 
oltreché a dover lavorare nei locali malsani della Royal Insti- 
tution, il che gli procurò un avvelenamento da piombo. Morì 
nel 1867. 
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di Claudio Santucci 


bbiamo messo le mani proprio nel 
molto piccolo, e come tutte le 
cose che hanno questa caratteri¬ 
stica, riescono un po’ ostiche da com¬ 
prendere, perché non è possibile mani¬ 
polarle direttamente, soddisfando così 
quella piccola scimmia che è dentro di 
noi. 


LA MEMORIA 


L’unità fondamentale della memoria di 
un calcolatore è il Bit. Questo Bit si può 
trovare solo in due diverse condizioni, e 
solo quelle: può essere, cioè, acceso o 
spento. 

Le informazioni, in un computer, vengo¬ 
no immagazzinate in questo modo, se il 
bit è acceso avrà un valore, altrimenti, se 
spento, il significato cambia. 

Facciamo un esempio: un vostro amico 
vi telefona per sapere se rimanete in 
casa, perché vorrebbe passare a salutar¬ 
vi. Voi rispondete che non lo sapete e 
per evitare di fargli perdere tempo a sali¬ 
re le scale gli dite “se vedi la luce accesa 
in camera mia vuol dire che sono in 
casa, altrimenti no”. Questa è già una 
informazione sullo stato di una certa si¬ 
tuazione, chiaro no?! 

La memoria del computer funziona pres¬ 
sapoco così, la lunga sequela di bit avrà 
una determinata sequenza di acceso/ 
spento, a seconda del tipo di informazio¬ 
ne che sarà contenuta, e a quella deter¬ 
minata sequenza, corrisponderà solo 
una ben determinata informazione. 


UN CODICE 


Supponiamo che al valore “acceso” sia 
dato convenzionalmente il codice 1 e al 
valore “spento” sia dato il codice 0. 

Il Bit può trovarsi solo in queste due con¬ 
dizioni (0-1) che rappresentano, quindi, 
l’unità di informazione più piccola possi¬ 
bile. Un codice che si basa solo su due 
possibilità si chiama BINARIO (nulla a 
che vedere con i treni) e la parola BIT 
deriva, appunto dall’unione di due parole 
inglesi “Blnary digiT” che in Italiano suo¬ 
na come cifra binaria. 

Come abbiamo detto, nel codice Binario 
le informazioni vengono immagazzinate 
in sequenze stabilite di 0/1 secondo il va¬ 
lore e il significato dell’informazione in 
questione. 

Ritorniamo all’esempio delle lampadine, 
e stavolta aggiungiamo che la lampadina 
accesa avrà valore 1, mentre quella 
spenta avrà valore 0. 

Siamo in un ristorante e la Direzione, per 
far risparmiare strada al cameriere, ha 
istallato due lampadine sulla porta della 
cucina per indicare in maniera immedia¬ 
ta ed univoca le cose che sono disponibi¬ 
li per essere servite al cliente, in modo 
tale che il cameriere possa rispondere ed 
eventualmente esaudire la richiesta del 
cliente immediatamente senza andare, 
ogni volta, a ficcare il naso in cucina. Il 
codice convenuto è strutturato in questo 
modo: 

0 - 0 = Non c’è niente di pronto, atten¬ 


dere dieci minuti. 

0 - 1 = Di pronto c’è solo il Primo. 

1 - 0 = Solo i secondi sono a disposizio¬ 
ne. 

1 - 1 = Può essere asaudita qualsiasi ri¬ 
chiesta. 


DATI PIÙ COMPLESSI 


Usando un codice con due bit è possibi¬ 
le, come abbiamo visto, codificare solo 
quattro informazioni diverse. Se la mole 
di informzioni è maggiore, avremo biso¬ 
gno di un codice più complesso che ci 
consenta un numero maggiore di combi¬ 
nazioni. Un codice con tre bits, ad esem¬ 
pio, può rappresentare otto condizioni 
differenti (*). Per avere un codice che sia 
in grado di coprire le combinazioni date 
dai numeri e dalle lettere dell’alfabeto, 
avremo bisogno che sia ancora più com¬ 
plesso. Le lettere dell’alfabeto sono ven- 
tisei e le cifre dieci. Un codice a cinque 
bit sarà insufficiente, dal momento che 
riuscirà a contenere solo 32 combinazio¬ 
ni, mentre a noi ne servono 36. Occorro¬ 
no, perciò, come minimo 6 bits, anche 
se, in realtà le memorie degli attuali com- 
puters sono organizzate con strutture, 
minimo, ad 8 bits. 


IL BIT SI ORGANIZZA E DIVENTA 
BYTE 


Vista, nella pratica reale, la sempre mag¬ 
giore complessità e varietà di dati e infor¬ 
mazioni che devono essere gestite da un 



I bytes nella memoria vengono “incasellati” partendo da destra a sinistra, 
e questo per ogni riga. 


BYTE 0 

BYTE 1 

BYTE 2 

BYTE 3 


BYTE 63 

BYTE 64 

BYTE 65 

BYTE 66 

BYTE 67 

r 


.ii, 

j f- MEZZA VOCE -> J f- MEZZA VOCE 4 1 

J<-VOCE- 


Un gruppo di quattro byte è chiamato “Voce”. La Voce è scomposta in 
due “mezze voci” a seconda del tipo di organizzazione interna. 
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computer, si è reso necessario organiz¬ 
zare questi nuclei elementari di informa¬ 
zione (i bit) in strutture più complesse for¬ 
mate dall’unione di più bits per formare 
una struttura più articolata, ma nello 
stesso tempo, governabile ed affidabile, 
come una sorta di organismo pluricellula¬ 
re. 

Questa struttura è il Byte (dall’Inglese, 
piccolo morso). 

Un Byte è formato dall’unione di almeno 
otto bits. Questa organizzazione (byte) 
rappresenta il vero modo in cui è costrui¬ 
ta la memoria di un computer, che non è 
quindi, realmente, organizzata in bit, ma 
in byte. 

Un byte, essendo composto da otto bits, 
potrà contenere fino a 256 combinazioni 
diverse. Ma perchè proprio 256, come si 
arriva a questo valore? Vediamolo insie¬ 
me. 

IL GIOCO DELLE POTENZE ~ 

Il byte è formato da otto bits, e su questo 
siamo d’accordo. Questi bits, per con¬ 
venzione, verranno numerati da destra a 
sinistra, partendo da 0 così da dare: bit7 
bit6 bi5 bit4 bit3 bit2 bitl bitO. 

Nel codice binario ogni bit rappresenta 
una potenza di 2. Per ottenere, quindi, il 
valore corrispondente a quella determi¬ 
nata sequenza di 0/1 si eleveranno, in 
modo corrispondente alla posizione, i bit 


contenenti 1 (elevare 0 ad una qualsiasi 
potenza dà sempre 0) e se ne somme¬ 
ranno i valori ottenuti. 

Facciamo un esempio: ammettiamo di 
voler sapere il valore, in numeri decimali, 
del byte 00001001. Abbiamo detto che i 
bits componenti il byte sono numeri in 
ordine crescente da destra a sinistra. 
Detto questo, ecco la conversione (basta 
ricordarsi di partire dalla posizione più a 
detra). 

1 x 1 = 1 (2 elevato alla 0, poiché que¬ 
sto è il bit 0) 

Ox 2 = 0 (2 = 2 elevato alla 1) 

0 x 4 = 0 (4 = 2 elevato alla 2) 

I x 8 = 8 (8 = 2 elevato alla 3) 

Ox 16 = 0 (16 = 2 elevato alla 4) 

Ox 32 = 0 (32 = 2 elevato alla 5) 

0 x 64 = 0 (64 = 2 elevato alla 6) 

0 x 128 = 0 (128 = 2 elevato alla 7) 

II valore decimale del byte 00001001 
sarà, quindi, il numero 9. 


La memoria del computer è organizzata 
in una grande sequenza di bytes. Per 
convenzione si è stabilito che la capacità 
di memoria di un computer sia espressa 
in K bytes e cioè 1 K corrispondente a 
1024 bytes. Adesso sappiamo un’altra 
cosa. Quando leggiamo, da qualche par¬ 
te, che un certo computer ha una memo¬ 
ria di, ammettiamo, 64K, sappiamo cosa 


vuol dire, e cioè che il computer in esa¬ 
me ha la possibilità di “tenere” in memo¬ 
ria fino 65.536 (1024x64 bytes differen¬ 
ti). 

Più grande, quindi, sarà il numero di K e 
più grande sarà la memoria di un compu¬ 
ter; ma la bontà e la qualità di una mac¬ 
china non dipendono, esclusivamente, 
dalle sue capacità di memoria, ma anche 
per esempio, dalla struttura dei suoi 
bytes che può essere, oltre che ad otto, a 
sedici e a trentadue bits, dando così, a 
quel determinato elaboratore, la possibi¬ 
lità di “capire” codici molto più raffinati e 
complessi (ricordate il gioco delle combi¬ 
nazioni possibili) e di smaltire più veloce¬ 
mente i bytes da prendere in esame. 

Ma questo è un’altro discorso che fare¬ 
mo in un’altra occasione. 


(*) UN ESEMPIO DI 
CODICE BINARIO 
CON TRE BITS 

BINARIO 

000 

001 

010 

011 

100 

101 

110 

111 


UN’ALTRA SIGLA 


DECIMALE 

0 

1 

2 

3 

4 

5 

6 
7 


CON LO SCONTO 
DEL 10% PER TUTTI 

I LETTORI DI LIST 

Edita dalla ANTHROPOS s.r.l. ecco una collana 
di volumi per “Studiare col Computer”: i 
programmi scolastici elaborati su cassetta 

In questo primo volume “Algebra per il Biennio”, per le 
scuole superiori di ogni tipo, l’obiettivo è spiegare il 
programma scolastico relativo alla materia in oggetto 
(l’Algebra in questo caso) passo dopo passo, in maniera 
estremamente semplice, facendo sì che l’elaboratore possa 
essere un vero e proprio “insegnante privato”. 

II volume può essere acquistato in tutte le librerie specializzate 
a L. 20.000, oppure se richiesto alla redazione di LIST la 
Casa Editrice Anthropos praticherà, per tutti nostri lettori, un 
prezzo particolare di L. 18.000 comprese la cassetta e le 
spese di spedizione. Per l’ordinazione dovete compilare il 
modulo alle pag. 81/82. 

Approfittate subito perché le copie messe a disposizione per i 
lettori di LIST sono limitate. 



Il volume più la cassetta a L. 18.000 anziché L. 20.000 
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HANDBOOK 



A tutti gli utenti del Texas TI/99-4A è nota l’importante relazione esistente fra le istruzioni CALL KEY e CALL JOYST e la messa a 
punto del movimento da imprimere ai caratteri grafici. 


di Osvaldo Contenti 


;;!|pi; oco alcune novità inerenti le istru- 
i;j|§Ì zioni sopracitate, che consentono 
una pjj yelOCe traSITIÌSSÌOne dei 
comandi da tastiera e da cloche, senza 
l’utilizzo delle usuali istruzioni IF... THEN 
che ne rallentano grandemente l’operati¬ 
vità. 

Per ambedue le istruzioni fruiremo inve¬ 
ce delle utilissime ON... GO TO, che di¬ 
stribuiranno ogni singola manovra impar¬ 
tita dal joystick, e se questo può apparire 
semplice nei confronti della CALL KEY, 
non lo è altrettanto per la consorella 
CALL JOYST, poiché, poco accortamen¬ 
te, la Texas Instrumens ha assegnato 
medesime costanti a diversi spostamenti 
di cloche; naturalmente questo si rivela 
dannoso se le stesse costanti devono es¬ 
sere, in qualche modo, sommate per uti¬ 
lizzarle nella ON..GOTO. 

GLI SPOSTAMENTI DI CLOCHE ~ 

Sarà facile constatare, dopo una rapida 


rilettura della pagina 94 del manuale 
d’uso, che ad esempio le costanti degli 
spostamenti di cloche in alto e a destra 
sono solo invertite nei valori X e Y, ma 
perfettamente identiche, ed una sempli¬ 
ce somma di queste avrebbe dato il me¬ 
desimo risultato, decurtando invariabil¬ 
mente almeno una delle informazioni sul¬ 
le posizioni di cloche. 

La soluzione trovata è invece nella sem¬ 
plice espressione: 

ABS (A + 5) + (B*3), che ci permette di 
attribuire un valore numerico diverso per 
ogni movimento della leva joystick. 
Queste le due righe di listato che potrete 
usare in qualsiasi programma: 

100 CALL JOYST (I, A, B) 

110 ON ABS (A + 5) + (B*3) GOTO 0, 1, 

0, 1, 

0 , 0 , 

CLOCHE A RIPOSO, 

1,i,1,->,1, ✓,!, 1, 1,1. t, 1,1,1. 


Le frecce indicano ovviamente la direzio¬ 
ne di cloche, corrispondente ai risultati 
dell’espressione; voi non dovete fra altro 
che assegnare a queste posizioni i nu¬ 
meri di riga desiderati relativi agli sposta¬ 
menti. 

Tutte le cifre 1 che compaiono nella riga 
110, sono invece semplicemente “di 
servizio” poiché l’espressione preceden¬ 
te non arriverà mai a richiamarle, esse 
però servono a distanziare correttamente 
gli altri risultati sino al ventunesimo. 
L’uso della cifra “uno” è stato dettato 
solo da ragioni di brevità e per un minor 
spreco di caratteri, nondimento sarà me¬ 
glio approntare nel vostro programma la 
riga “uno”, magari contenente una sem¬ 
plice REM, che in ogni caso, lo ripetia¬ 
mo, non sarà mai richiamata. 

Per maggior chiarezza, nella tabella sot¬ 
tostante, troverete i nuovi valori assegna¬ 
ti dall’espressione di riga 110, abbinati 
alle note posizioni di cloche. 

Tenete sempre con voi la tabella! Essa vi 


104 


LIST 4 




































































































































































































































































































































































































































































































































































































































































































Questi sono i valori assegnati, dall’espressio¬ 
ne della riga 110, alle posizioni della cloche. 


fornirà immediatamente e visivamente la 
giusta collocazione di tutti i movimenti 
impostati nella stesura dei vostri giochi, e 
naturalmente se non doveste utilizzare 
tutte le otto possibilità di movimento esi¬ 
stenti, i numeri di linea delle posizioni su¬ 
perflue, potrebbero richiamare la prece¬ 
dente riga 100 ed essere così annullate. 


VELOCIZZARE LA CALL KEY 


Seguendo l’esempio precedente, anche 
per il controllo CALL KEY possiamo stila¬ 
re poche righe di listato che non com¬ 
prendano la tastiera zero (ha in se troppi 
caratteri) ma le semitastiere uno e due. 
Ecco di seguito le istruzioni complete: 

Tastiera uno 

300 CALL KEY (I, K, S) 

310 IF S = 0 THEN 300 
320 ONK+1 GOTO X, A, S, D, W, E, 
R, 2, 3, 4, 5, T, F, V, C, Z, B, G, Q, 
1 


Tastiera due 

400 CALL KEY (2, K, S) 

410 IF S = 0 THEN 400 

420 ON K + 1 GOTO M, H, J, K, U, I, O, 

7,8,9, 0, P, L, .,,, N,/,;, Y, 6 

Le istruzioni non contengono natural¬ 
mente alcun numero di linea, che può va¬ 
riare a seconda del programma, bensì le 
rispettive posizioni dei caratteri assegna¬ 
te dall’espressione. 

Potrete notare come inserendo tali righe 


in un vostro programma, lo stesso risul¬ 
terà eccezionalmente velocizzato nei mo¬ 
vimenti o per qualsiasi funzione destina¬ 
ta ai pulsanti. 

Da ricordare anche che con le linee 320 
e 420 si sono sintetizzate in una sola li¬ 
nea ben ventuno possibili istruzioni IF... 
THEN. 


UN PICCOLO TRUCCO 


Sulla falsariga delle novità precedenti 
alle volte potrà essere utile gestire con¬ 
temporaneamente sia i caratteri alfabeti¬ 
ci maiuscoli che quelli minuscoli, in que¬ 
sto caso digiterete così: 

500 CALL KEY (O, K, S) 

510 IF S = 0 THEN 500 

520 IF (K = 65) + (K = 97) THEN. 

La riga 520, simulando l’operatore logico 
“OR”, raccoglie l’informazione sia dalla 
“A” maiuscola che da quella minuscola. 
Questi piccoli esempi pratici ci avvicina¬ 
no passo passo ai temi dell’algebra boo- 
leana, che verrà chiarita ed analizzata in 
uno dei prossimi articoli, sempre ovvia¬ 
mente in una fase simulata adattata al 
nostro Texas. 


STUDIO PICCA ROMA 



SOPIN 

società per l'informatica spa 


INFORMATICA 
TELEMATICA 
OFFICE AUTOMATION 
SICUREZZA FISICA E 

LOGICA 
RICERCA APPLICATA 
FORMAZIONE E 
ADDESTRAMENTO 


ROMA VIA DEL SERAFICO 200 TEL5477 
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TURN BACKER MV-911 

Quando il robot si trova davanti ad 
un ostacolo gridare «Look out» e 
questo si girerà immediatamente a 
sinistra. L. 85.000 


AVOIDER MV-912 

Un robot intelligente che percepisce 
gli ostacoli mediante una raggio 
infrarosso e li evita. 

L. 89.000 


LINE TRACER II MV-913 

Guidato da un sensore a raggi 
infrarossi questo robot segue 
qualsiasi linea nera tracciata su un 
foglio bianco. L.115.000 


PIPER MOUSE MV-915 

Usando un fischietto unito al kit 
PIPER MOUSE eseguirà 
immediatamente i comandi 
comunicativi: sinistra, stop, destra, 
stop, avanti e stop. L.89.000 



PEPPY MV-916 

Il robot PEPPY è provvisto di un 
sensore sensibile al suono e a 
quanto incontra sul suo cammino. 
Quando il sensore viene a contatto 
con un ostacolo o percepisce un 
rumore il robot si gira a sinistra. 

L.49.500 


SOUND SKIPPER MV-917 

Ordinare al robot di camminare 
dicendo ad alta voce «Walk» o 
battendo le mani: questo inizierà la 
sua «passeggiata» fermandosi poi 
da solo. L.49.500 


MEMOCOM CRAWLER MV-918 

Questo robot è controllato da una 
memoria RAM 256x4 bit, mediante 
la tastiera inclusa nel kit e si muove 
in base ai comandi comunicati a 
quest’ultima. L.149.000 


MONKEY MV-919 

Ordinare ad alta voce al robot di 
muoversi (MOVE) o battere le mani: 
MONKEY, lo scimmiotto, inizierà ad 
avanzare con le braccia. 

L.49.500 



MR.BOOTSMAN MV-931 

Può camminare o correre in avanti e 
indietro, a sinistra e a destra: 
quando il movimento di tre delle sei 
zampe meccaniche viene cambiato 
nell’opposto, il robot può girarsi di 
360°. L.69.000 


CIRCULAR MV-935 

È provvisto di due grandi ruote che 
gli permettono di ruotare in avanti, a 
destra, a sinistra e su se stesso. 
Tutti i movimenti sono controllati 
mediante un comando a distanza. 

L.149.000 


NAVIUS MV-938 

È un robot controllato mediante 
dischetti programmabili. È in grado 
di riconoscere il bianco e il nero del 
dischetto programmato e quindi 
muoversi in avanti, a destra, a 
sinistra o fermarsi. L.115.000 


MEDUSA MV-939 

Il robot dal cervello elettronico. 
Registrati i comandi, il robot inizierà 
a muoversi femandosi 
automaticamente passato il tempo 
prestabilito. 

L.65.000 


DARE VITA A QUESTI SIMPATICI «CONGEGNI ELETTRONICI» È ENTUSIASMANTE... 


...Ma c’è una ragione di più per 
entusiasmarsi: finalmente la 
TEXIM ITALIA, per venire 
, incontro ai lettori di LIST che 
non hanno la possibilità di 
reperire i «Robots in kit» nella 
propria città, mette a disposizione 
gratuitamente un servizio di 
vendita per corrispondenza che 
permetterà a chiunque lo 
desideri di ricevere direttamente 
a casa sua il robot richiesto. 


X- 


Spett. TEXIM ITALIA, desidero ricevere i seguenti robots in kit: 


□ 

MV911 

□ 

MV912 

f 1 Invio in allegato assegno bancario di L.intestato a TEXIM ITALIA' 

□ 

MV913 

□ 

MV915 

□ Ho effettuato il versamento di L. . 
TEXIM ITALIA 

.tramite vaglia postale intestato a 

□ 

MV916 

□ 

MV917 

Nome . 

Cognome . 

□ 

MV918 

□ 

MV919 

Via . 

n .CAP . Loc . 

□ 

MV931 

□ 

MV935 

^Firma . 

Telefono . 

X 

□ 

MV938 

□ 

MV939 


Ritagliare, compilare e spedire in busta chiusa a TEXIM ITALIA MOVIT - Via Flavio Stilicone, 111-00175 Roma. 




























































IL SOFTWARE UTILE 



iìifiip ecentemente abbiamo dedicato 
iiljliii largo spazio ai programmi grafici 
SlIinliH del Commodore 64. In particolare 
ci siamo occupati dei cosiddetti fogli da 
disegno elettronici (drawsheet): parlam¬ 
mo di Doodle, Koala Paint, Magic Paint, 
ecc.. Questo mese torniamo sull’argo¬ 
mento, perché nel frattempo la tecnolo¬ 
gia del software su C64 ha fatto passi da 
gigante: giudichino i lettori. I programmi 
presi in esame sono Printshop, 
The Newsroom, Profipainter e Titolatrice. 


PRINTSHOP (BRODERBUND) 

È un programma eccellente sotto vari 
aspetti, forse il migliore e il più utile di 
quelli che presentiamo questo mese. 

Lo scopo è di stampare (su Commodore 
MPS801/803; esiste una versione per 


EPSON) 4 tipi di oggetti grafici: 

Biglietti d’auguri: valentine, compleanni, 
ecc.; 

Striscioni: lunghi quanto volete perché 
sono stampati orizzontalmente; 

Avvisi; 

Carta intestata. 

Per comporre i vostri biglietti personaliz¬ 



zati potete inoltre avvalervi di una biblio¬ 
teca di immagini pronte e di fonti tipogra¬ 
fiche davvero invidiabili: 3 dischi pieni di 
immagini (più di 100, in tutto). 

Per di più potete crearne altre da soli, 
usando due ambienti diversi: 

— editor grafico, per creare figure e mo¬ 
tivi ornamentali; 

— caleidoscopio automatico (motivi or- 
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namentali generati dal computer). 
L’effetto su carta bianca è eccellente, ma 
diventa fantastico su carta colorata: oc¬ 
corre però una stampante a frizione, op¬ 
pure la speciale carta colorata coi buchi 
laterali che però in Italia non si trova. 


THE NEWSROOM (SPRINGBOARD) 

L’obiettivo è la composizione e la stampa 
di un giornale. Articoli, foto, titoli, pagine: 
tutto composto da voi. Il titolo è azzecca¬ 
to: “Newsroom” significa “stanza delle 
notizie”. 

All’inizio del programma, dal quadro 
principale, potete accedere a 6 sottoam¬ 
bienti: 

* Laboratorio fotografico (Photo Lab) 

* Scrivania (Copy desk) 

* Impaginazione (Layout) 

* Telescrivente (Wire Service) 

* Tipografia (Press) 

Nel “Photo Lab” avete a disposizione 
qualcosa come 600 figure già pronte che 
possono essere usate per corredare gli 
articoli. Ovviamente potete anche creare 
figure nuove, o aggiungere particolari a 
quelle che avete in biblioteca. 

Con la scrivania - Copy Desk - scrivete il 
testo degli articoli. Potete inoltre formare 
i titoli di varia grandezza in caratteri di 




varie forme e inserire in qualsiasi posizio¬ 
ne nel testo i disegni che avete creato col 
Photo Lab. 

L’impaginazione - Layout - serve a di¬ 
sporre sulla pagina gli articoli. Avete a 
disposizione 4 formati; questa è forse la 
limitazione maggiore del sistema: non 
potete formare una pagina che somigli in 


iuiio e per tutto a quena ai un giornale. 

Il “Wire Service” è l’ambiente in cui, me¬ 
diante modem e telefono, vi potete colle¬ 
gare ad altri computer. Potete così usare 
il C64 come se fosse una telescrivente: 
ricevere testi e figure da paesi lontani, 
spedire dispacci oltre oceano... 

La tiporafia - Press - è l’ambiente in cui 
viene prodotto fisicamene il giornale. Le 
stampanti compatibili sono molte: Com¬ 
modore, Epson, Gemini, ecc. 

Il manuale fornito con il pacchetto è as¬ 
sai completo, e costituisce una piccola 
guida al mestiere di giornalista. 

Malgrado le sue deficienze (è lento e ab¬ 
bastanza macchinoso) questo program¬ 
ma è assolutamente da non perdere, 
perché è unico nel suo genere. L’uso a 
scuola è caldamente raccomandato. 


PROFIPAINT (DATA BECKER) 

Il più bel drawsheet (matita elettronica) 
del momento. Senz’altro superiore ai vari 
Doodle, Koala Painter, ecc. 

La concezione Macintosh sta mietendo 
successi a più non posso. Questo pro¬ 
gramma si ispira chiaramente al pro¬ 
gramma MacPaint della macchina della 
Apple, e anche se non ne raggiunge i 
vertici di prestazione ne emula però la 
maggior parte delle funzioni. 

La maggiore limitazione è che non per¬ 
mette la stampa (occorre un programma 
a parte). 

Usate il joystick per selezionare da un 
menù, sempre presente, un insieme di 
funzioni grafiche, oppure l’apertura di al¬ 
cune finestre per dare comandi al siste¬ 
ma. L’opzione Zoom è molto originale e 



precisa. Potete inoltre muovere tutto il di¬ 
segno sullo schermo: in alto, in basso, a 
destra, a sinistra. 


TITOLATRICE 


Gli appassionati di “fai-da-te” e di video¬ 
registrazione possono finalmente conta¬ 
re sul loro home-computer per risolvere 
un problema finora poco risolubile: quel¬ 
lo dei titoli delle loro opere televisive. Il 
programma da noi esaminato, benché in 
BASIC, effettua tutta una serie di funzio¬ 
ni speciali abbastanza spettacolari. Pote¬ 
te creare scritte e disegni multicolori, 
metterli in sequenza, costruire semplici 
animazioni dei testi. 

Se in coppia con questo programma usa¬ 
te il “Videodigitizer” della Telav di Trez- 
zano sul Naviglio, per il quale però oc¬ 
corre una telecamera ed una interfaccia 
speciale (costo: meno di mezzo milione), 
avrete a disposizione un piccolo sistema 
di creazione di immagini digitali assoluta- 
mente eccezionale per un hobbista. Po¬ 
tete infatti scambiare immagini nei due 
sensi: dal computer al televisore e vice¬ 
versa. 
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GRAPHICS 




ÌÌÌIììIìkI!: 9 ni disegnatore è abituato a lavo- 
rare con carta e matita: abbassan- 
!i!i::::::iii do la matita sulla carta riesce a 
visualizzare un punto, lasciandola scor¬ 
rere sul foglio traccia una linea, sollevan¬ 
do la matita dal foglio e spostando la 
mano riesce a ricominciare il disegno da 
un diverso punto del foglio. Tutte queste 
operazioni possono essere riassunte, e 
limitate in numero, in due elementari fun¬ 
zioni: 

— il posizionamento dell’ipotetica penna 
del disegnatore meccanico in un cer¬ 
to punto del foglio (cioè il posiziona¬ 
mento del fascio di elettroni in un de¬ 
terminato punto dello schermo); 

— il tracciamento di una retta dalla posi¬ 
zione precedentemente occupata ad 
una nuova, punto di partenza per la 
ripetizione delle medesime operazio¬ 
ni. 

Lo schermo di un computer può essere 
considerato come un comune piano di di¬ 
segno sul quale è possibile individuare 
ciascun punto tramite le coordinate x,y in 
un riferimento cartesiano. 

Il numero di punti visualizzabili su di uno 
schermo grafico varia da computer a 
computer, ma sui modelli più diffusi i va¬ 
lori più comuni sono: 320 * 200 pixels 
per il Commodore 64, 256 * 192 pixels 
per gli MSX, 512 * 212 pixels per gli 
MSX 2, 256 * 196 pixels per lo ZX Spe- 


ctrum. 

Il pixel è schematizzabile con l’interse¬ 
zione degli assi di una immaginaria gri¬ 
glia tracciata sullo schermo, e per trac¬ 
ciare un segmento inclinato, la situazio¬ 
ne ottimale (del tutto teorica) vorrebbe 
che i pixels giacessero sulla congiungen¬ 
te i punti terminali della retta. Tutto ciò 
non è possibile a causa della particolare 
conformazione dello schermo grafico, 
cioè un reticolo fittizio, della quale si par¬ 
lava precedentemente. 

Per maggiore chiarezza, immaginiamo di 
dover tracciare il segmento AB della no¬ 
stra introduzione, e che per nostra sfortu¬ 



na tale linea, escludendo i pixel corri¬ 
spondenti ad A e B, non incroci, per una 
naturale approssimazione dei valori, nes- 
sun’altro pixel. È una situazione che per 
quanto assurda è invece molto reale, ba¬ 
sta pensare che se per i valori di X e Y 
appartenenti alla retta, non corrispondo¬ 
no gli stessi valori sullo schermo, teorica¬ 
mente l’immagine non è correttamente 
visualizzata (vedi fig. 1). 

Si pone a questo punto il problema: quali 
pixels accendere per visualizzare la li¬ 
nea? 

Per risolverlo bisogna rivolgersi a partico¬ 
lari algoritmi denominati LINE-DRAW- 
ING ALGORITHMS, algoritmi per il trac¬ 
ciamento di linee. 


LE FUNZIONI GRAFICHE PRIMITIVE 


Nei computers in vendita oggi, almeno 
per molti di loro, si dispone già di molte 
istruzioni grafiche (LINE, CIRCLE, ARC, 
DRAW, PSET, ecc.) che provvedono a 
svolgere automaticamente questo tipo di 
algoritmi, per visualizzare determinate 
forme richieste dall’utente. Anche molte 
periferiche di INPUT (digitizer, tavolette 
grafiche, mouse, ecc.) presentano nel 
software di gestione ad esse fornito, que¬ 
ste istruzioni grafiche primitive. 

Le istruzioni grafiche primitive provvedo¬ 


no 
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no, in fase di visualizzazione, ad appros¬ 
simare i valori dei singoli punti delle figu¬ 
re, ai loro valori ideali. Pur operando del¬ 
le sostanziali modifiche nei valori origina¬ 
li, le linee disegnate sullo schermo devo¬ 
no rispondere a requisiti specifici: devo¬ 
no essere dirette, i loro estremi devono 
essere effettivamente quelli indicati, il 
loro spessore deve essere costante indi¬ 
pendentemente dall’inclinazione e dalla 
lunghezza e soprattutto la loro visualiz¬ 
zazione deve avvenire in margini accet¬ 
tabili di tempo. 

Grazie alle istruzioni grafiche primitive, 
oggi sempre più diffuse anche sui com- 
puters economici, è possibile tracciare 
cerchi, archi di cerchio, ellissi, linee sem¬ 
plicemente impartendo le corrispondenti 
istruzioni accompagnate dai parametri 
fondamentali necessari alla loro visualiz¬ 
zazione. 

Ad esempio, sul Commodore 64 dotato 
di Simon’s BASIC, per tracciare un cer¬ 
chio con punto di centro in (x,y), raggio 
verticale a, raggio orizzontale b, nel colo¬ 
re c, è sufficiente utilizzare l’istruzione: 

CIRCLE x,y,a,b,c 

Analogamente per tracciare una linea dal 
punto di coordinate (xl, yl) al punto di 
coordinate (x2, y2) nel colore c, sulla 
maggior parte dei computers viene utiliz¬ 
zata l’istruzione: 

LINE (xl, y1)-(x2, y2), c 

E così via per tutte le altre istruzioni di 
carattere grafico presenti sui vari compu¬ 
ters. 

Anche in questo numero è presente un 
programma previsto per il Commodore 
64 espanso con il Simon’s BASIC. Il suo 


uso, con qualche modifica può essere 
esteso anche ad altri computers, e la sua 
maggiore particolarità consiste nel trac¬ 
ciamento di linee congiungenti due punti 
indicati, sfruttando esclusivamente l’uso 
dell’istruzione grafica primitiva PSET 
(x,y), operando tutte le trasformazioni ge¬ 
neralmente demandate ai D.D.A. 


IL D.D.A. - DIGITAL DRAWING 
ALGORITHM 

Il D.D.A. realizzato per il Commodore 64, 
per il tracciamento di una retta dal Punto 
(xl, yl) al punto (x2, y2), basa il suo fun¬ 
zionamento sull’uso dell'equazione diffe¬ 
renziale della retta. 

L’equazione di una generica retta è 
espressa dalla formula: 

ax + by + c = 0 

Se nella formula descritta tutti i coeffi¬ 
cienti sono diversi da 0, la retta non sarà 
parallela ad alcun asse, né passerà per 
l’origine; l’equazione differenziale della 
retta è molto semplice: 



- 



A A 

— 


- 





















/ 



A 











A 











ZA 











_ V 
























dy/dx = y/x 

In una situazione teorica l’applicazione 
del metodo degli incrementi per descri¬ 
vere una linea sarebbe come in fig. 2. 

Il D.D.A. per stabilire il pixel da visualiz¬ 
zare, parte dal primo punto (xl, yl) ed 
utilizza l’equazione differenziale per cal¬ 
colare il punto successivo; dopo tale pro¬ 
cedura lo stesso punto viene utilizzato 
per calcolare il successivo, fino a giunge¬ 
re al punto (x2, y2). L’equazione differen¬ 
ziale fornisce l’indicazione su quanto ci 
si debba spostare per trovare il prossimo 
punto appartenente alla linea; lo sposta¬ 
mento è proporzionale all’inclinazione 
della linea. 

L’unico problema presentato è la degra¬ 
dazione della precisione dei valori che 
devono essere numeri interi, per cui il 
D.D.A. è costretto a calcolare parecchie 
operazioni di troncamento. Per una retta 
generica accade (tranne che nel caso di 
rette inclinate a 45 gradi) che i valori di 
incremento di x ed y siano differenti, per 
tale motivo nel D.D.A. presentato in que¬ 
ste pagine ci sono una serie di calcoli per 
individuare il segno del coefficiente an¬ 
golare: 

m = -(a/b) 

Altri calcoli provvedono a stabilire gli in¬ 
crementi lungo i due assi. 

Occorre notare che un algoritmo usato 
per tracciare una linea retta non è il mi¬ 
gliore per tracciare (grazie alle procedure 
ricorsive spiegate in passato nel LOGO 
dal nostro collaboratore Paolo Ciancari- 
ni) ad esempio un cerchio. Esistono algo¬ 
ritmi specifici che semplificano di molto il 
lavoro dell’utente ed abbreviano il tempo 
di uso del computer. 


1 REM ********************************* 


2 REM * * 

3 REM * RLGORITMO TRACCIAMENTO LINEE * 

4 REM * * 

5 REM * DIGITAL BRANING ALGORITHM * 

6 REM * * 

7 REM * LIST - GRAPHICS '86 * 

8 REM * * 


9 REM ********************************* 

i 0 PRI NT ' 71S' ' : COLOUR0,0 
20 HIRES1,0 : TEXT5,5,' ‘GRAPHICS' ',1,2,8 
30 TEXT5,25, "LINE BRAMINO ALGORI THM", 1, 1 
.8 

40 TEXT5,35,"DBA - DIGITAL BRAMINO ALGOR 
ITHM",1,1,8 

50 TEXT230,188,"MT 1986",1,1,7 

55 V=190 

56 RECO,0,319,199,1 

60 FORX=10TO310STEP20■V=Y-8■BLOCKX,V,X+8 
,V+8,1 NEXTX 
62 PAUSE5 

65 CSET1 PRINT'XNSERIRE GLI ESTREMI BEL 
SEGMENTO DA" 

66 PRINT"VISUALIZZARE <10<X<310) - <10<V 
<170)M«" 

70 PR I NT : INPIJT • 'COORDI NATE X1, V1' ', X1, V1 


72 IFX1 < 10ORX.1 >310ORV1 < 10ORY1 > 170THENPRI 
NT TI" GOT065 

75 PR I NT I NF'IJT ' 'COORD I NATE X2, V2 ' ' 1X2, V2 
77 IFX2<1@0RX2>310ORY2C10ORY2>170THENPRI 
NT ' 73" : GOT 065 

80 PRI NT "73" ; CSET2 : HIRES1,0 
90 REC0,0,319,199,1 

95 REC30,178,260,22,1 

96 TEXT50,190,"DBA - DIGITAL BRAMINO ALO 
ORITHM",2,1,7 

97 TEXT80,182,"LINE BRAMINO ALGORITHM",2 
,1,7 

100 SX=SGN<X2-X1>:SV=SGN<V2-V1> 

110 NX=ABS< X2-X1> : NV=ABS<V2-V1> 

120 X=X1 V=V1:GOSUB300 
130 IFNVONXTHEN190 
140 ND=I NT <NXX2) 

150 F0RK=1T0NX 
155 HD=ND+NV 

160 IFND<NXTHENX=X+SX: GOTO 100 

170 NB=ND-NX 

172 X=X+SX 

175 V=V+SV 

180 GOSUB300 

185 NEXTK 

186 GOTO240 


190 NB=INT(NV/2) 

200 F0RK=1T0NY 
205 NB=NB+NX 

210 IFNB<NVTHENV=V+SV : G0T023Ò 

220 ND=ND-NV 

225 X=X+SX 

227 V=V+SY 

230 GOSUB300 

235 NEXTK 

240 GOTO400 

300 IFX<10ORX>310ORYC10ORV>170THENRETURN 
310 PLOTX,V,1■RETURN 

400 TEXTX1,V1-8,STR* <X 1 > + ","+STR*(VD, 1, 

1,7 

410 TEXTX2,V2+4,STR$CX2>+","+STR*<Y2>,1, 
1,7 

420 GETG4 IFG*=""THEN420 
430 NRM : PR INT' '73'' 

440 PRINT-XMBALTRO ESEMPIO <S/N>?" 

450 GETRf : IFR*='"'THEN450 
460 IFRf="S”THENPRINT"71" : CLR : G0T065 
470 IFR$="N"THENPRINT ' 73" : END 
480 GOTO430 


READY. 
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COMPLETA LA TUA COLLEZIONE 





n” 3- 84 


n° 2-'85 


n” 8/9-'85 







n" 4-'84 


n° 3-'85 


n° 10/11-85 




n° 6-'84 


n° 6/7- 85 


LIST è l’informatica a portata di mano, è fatta per durare nel 
tempo e va consultata ogni volta che ne hai bisogno. È una 
collezione preziosa di suggerimenti e di segreti per imparare 
meglio. 

È per questo che non puoi perdere neanche un numero. 

Se alla tua collezione manca qualche numero, approfitta di 
questa occasione... Puoi completare la tua raccolta ad un prezzo 
particolare. È un’offerta di LIST. 


n° 1/2-86 


prezzo particolare ToSo ctóaunoP UST ? 

ra^o c , omprese) anziché L 7 000 <p£“ s 

n°. 

Invio in allegato □ ricevuta di cLp/n” 72609001 
intestato a LIST (vedi modulo 
pagg. 81/82) 

□ assegno intestato a LIST per 
L. 

Ritagliare e spedire in busta chiusa a l ist -c 
A rretra., Casella Postale 4092 -Sfai ^ 
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Sapete cosa faranno i robot nel 
prossimo futuro? E quando arri¬ 
veranno in Italia nelle nostre 
case? 

Non perdetevi il “match” Sony- 
Canon: HB-10P contro V20, due 
giganti MSX in “combattimen¬ 
to”. 

Sapete quanti problemi si pre¬ 
sentano dopo l’acquisto di un 
computer? Noi vi aiuteremo a 
risolverli. 

Attenzione a non svenire! Il ro¬ 
bot in kit che vi presenteremo fa 
cose strabilianti. 

Aveta mai giocato a “Monopoli” 
con il computer? Avete mai 
pensato di imparare la Geome¬ 
tria senza troppa fatica? Questo 
sarà possibile con alcuni nostri 
“superprogrammi”. 

Due nuove rubriche vi attendo¬ 
no per aiutarvi nel mondo infor¬ 
matico: “Suggerimenti” e “Le 
parole difficili”. 

...E non dimenticata la 5 a Di¬ 
spensa del Corso, in cui vi dicia¬ 
mo come “scrivere col compu- 
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^ l’annata completa di List 1984: 

6 NUMERI-208 PROGRAMMI 

a L. 21.000 (spese postali comprese) 

Rispetto al prezzo di un singolo arretrato (L. 7.000) 
ogni numero lo paghi solo la metà, 3.500 
lire, realizzando un risparmio di ben 21.000 lire totali. 


CBM 64 

Sistemi lineari 

Moon Buggy 

Impariamo la fisica 

Al ristorante 

Piattaforma 5 

Equazioni di II grado 

Alimentatore stabilizzato 

Slalom 

Data Base 

Protezione 

Programmi 

Invader 

Bit il bruco 

Sintetizzatore 

Sfida intergalattica 

Quark 

Interrogazione di chimica 
Super menù 
Regressione lineare 
Commodore 13 
Attacco alla città 
Meteore 

Occhio alla cifra 
Tabelline spaziali 
Super polpetta 
Orologio ad alta risoluzione 

Vie 20 

Battaglia navale 
Poker 


Invasione 
Master Mind 
Froggy 
Grand Prix 
Space fight 

Il guardiano del tempo 

Il serpentone 

Ingrandimento 

Caratteri 

Roulette 

Intelletto 

Base aliena 

Flying simulator 

Black Jack 

Othello 

Roulette russa 

Defender 

Zombie 

Computer aided 
Design 
Alta velocità 
Surf 

Poesie... Random 
Occhio alla cifra 
Alien 

Arredamento per cucina 
Il galeone 
Campionato 
di calcio serie A 
Articoli determinativi 
Tabelline 


Il vampiro 
Fire fox 
Anagrammi 
XXIII Olimpics 
Tron 

Labirinto mobile 
Zgorbyus 

Teorema di Pitagora 
Totovic 

SEGA SC 3000 

Cascatutto 
Corso di Basic 
Bioritmi 
Totocalcio 

Caccia al sottomarino 
Video picture 

SHARP MZ 700 

Master Mind 
Grado di armonia 
Caccia al tesoro 
Riunisci la musica 
Istogrammi 

Risoluzione di equazioni 
con il metodo di Cramer 
Incontri di calcio 
Tombola 

ZX SPECTRUM 

Caccia alla balena 

Boat Race 

Bioritmi 

Bonus e Malus 

Agenda telefonica 

Elicottero 

Diagramma a 

coordinate polari 

Spectrum invaders 

Asteroidi 

Logo 

Corso di telegrafia 
Dinamite 

Yellow Submarine 
Labirinto 
Extraterrestre 
Status 

Strike and ball 
Equazioni simultanee 
Declinazioni latine 
Data Base 


Azienda agricola 
Tennis 

Salvate gli omini 
Valore a codice 
Colori della resistenza 
Calendario 
Legge di Ohm 
Il muro 
Bananas 
Giardinaggio 
Stendiamo il bucato 
La caccia 

Il monastero maledetto 
English tester 
Teorema di Pitagora 
Il treno aritmetico 
Occhio alla zia 

TI 99/4A 

React 

Ginnastica aerobica 
La coniugazione dei verbi 
Lezione di spagnolo 
Sulla spiaggia 
Mozart 
Il muro 

Quattro in linea 
Agenda telefonica 
Estratto conto 
Conversione 
Commodore/texas 
La vendetta del fantasma 
Istogrammi 

MPF II 

Oroscopo 
Enalotto 
High driver 
Banca 
Istogrammi 
O - X 

Fatturazione magazzino 
Quattro in fila 
Snake 

Viaggio nello spazio 

ORIC 1 

La fontana 
Entertainer rag 
Tris 
Rally 
La torre 


Zhorick 
Mosca cieca 
Conversione 
Coder decoder 
Renumber line 
Falciatrice 
Istogrammi 
Tabella 
Calendario 
Grand Prix • 

ZX 81 

Invaders 

Black holes 

Caccia al tesoro 

Slalom 

Asteroidi 

Alien descender 

Nebbia su Venere 

Jaws 

Gulp 

Memoria 

Rinumerazione 

Equazioni di II grado 

Mostro 

Stanze 

Dame 

Navi 

Neve 

Marzianetti 

Kong 

Software shop 

Fiori 

Mele 

Deltaplano 

Bowling 

Tiro al piattello 

S.O.S. attacco alla terra 

La casa abbandonata 

Dolci 

Topi 

Giochiamo in borsa 
Baccarat 
II cubo alfabetico 
Invasione di topi 
Lancio col paracadute 
Squash 

Rapina in banca 
Breakout 
Tiro alle anatre 
Il fiume 
Tiro a segno 


Il pagamento va effettuato a mezzo assegno bancario, vaglia postale o c.c.p. n° 72609001 intestato a LIST 
— Programmi per il Tuo Home Computer — Casella Postale 4092 — 00182 Roma Appio. (Vedi modulo 

alle pagg. 81/82) 





Un piccolo grande Amico 
da oggi perii futuro. 


È pratico perché compatibile 
con tutti gli MSX. 

È italiano perciò gode dell’assistenza 
immediata nella tua città. 

È super affidabile perché costruito 
dall’esperienza SAMSUNG. 
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Sta per iniziare 
un nuovo grande show 

Sony per prima presenta la videocassetta più piccola del mondo: ovvero la 
più grande. Tutta da scoprire. Nel suo nastro, largo quanto il diametrcdi una 
sigaretta, è racchiusa la più avanzata tecnologia Sony. Per offrirvi il favoloso 
arcobaleno dei colori Sony nelle più nitide immagini, accompagnate da 
un'incredibile suono Hi-Fi. Finalmente Video 8: il formato universale sotto- 
scritto dalle 127 marche più prestigiose della videoregistrazione mondiale. 
Ecco perché Video 8 è la piccolissima cassetta del grandissimo futuro. 

Videocassette Sony Video8. Sempre più piccole. Sempre più grandi. 












